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PREFACE 


Purpose of this Publication 


This Program Logic Manual (PLM) is a 
detailed guide to the internal structure of 
the Queued Telecommunications Access Method 
(OQTAM). It supplements the program 
listings by providing descriptive text and 
flowcharts; program structure at the 
machine instruction level is not discussed. 


Design of this Publication 


This PLM presents the logic of QTAM as a 
series of logical levels. Each succeeding 
level describes the program in more detail. 


e The Program Level: The first two 
sections describe the physical and 
logical organization of QTAM. QTAM is 
discussed from two points of 
view: first, as a program within the 
DOS control program structure; and 
second, aS a separate control program. 


e The Major Component Level: The third 
section gives an outline of QTAM 
operations at the component level. 
interaction among the major QTAM 
components is described in some detail. 
Appendix E is a foldout chart showing 
the general flow of QTAM operations and 
is designed to complement this section. 
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e The Routine Level: The next six 
sections contain detailed descriptions 
of the QTAM routines followed by 
flowcharts of all the routines. The 
flowcharts are arranged alphabetically 
by chart ID for easy reference. 


Detailed illustrations and descriptions 
concerning QTAM queues and subtasks, 
control block formats, and linkages are 
presented in appendixes. 
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In IBM System/360 Disk Operating System, an 
access method is a procedure for 
transferring data between main storage and 
an input/output device. A variety of 
access methods is available to the user of 
the Disk Operating System (DOS). One of 
these, the Queued Telecommunications Access 
Method (QTAM), can control data transfer 
between main storage and remote terminals. 


QTAM 1S a generalized input/output 
control system that extends the techniques 
of Logical I0CS to the telecommunications 
environment. Files accessed by the problem 
programmer are queues of messages incoming 
from, Or outgoing to, remote terminals via 
communication lines. Even though the time 
and order of the arrival and departure of 
messages to and from the central processing 
unit (CPU) are unpredictable, the support 
provided by QTAM enables the programmer to 
handle them as if they were organized 
sequentially. 


A telecommunications system operating 
under DOS/QTAM is logically divided into 
two types of programs each of which 
executes in a separate partition. 
types of programs are: 


These 


1. a message control program that always 
operates in the Foreground-one 


partition, and 


2. One or more message processing programs 
that execute in the Foreground-two 


and/or Background partitions. 


Note: With multitasking support, one or 
more message processing programs can be 
executed in the same partition as the 
message control program. The message 
control program must have the highest 
priority in the partition. For a complete 
discussion of multitasking, see the DOS 
System Control publication, Form Y29-5017. 


A message control program systematically 
and efficiently controls the flow of 
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message traffic from one remote terminal to 
another, and between remote terminals and 
any message processing programs. A message 
processing program consists of the 
programming required to process the 
contents of the messages. 


QTAM provides logic in support of both 
types of programs. Extensive support is 
supplied for a message control program and 
includes, via the linkages generated by 
QTAM macro instructions, the QTAM logic 
required to: 


1. identify the configuration of the 
telecommunication system to the Disk 
Operating System, 


2. establish and perform the line control 
procedures required for the various 
types of terminals and modes of 
connection, and 


3. control the routing of messages in 
accordance with the requirements of the 
user. 


GET/PUT logic is provided to a message 
processing program for obtaining messages 
to be processed and for placing response 
messages. 


The paramount reason for dividing 
telecommunications support into two types 
of programs is that message flow to and 
from the computer is random and proceeds at 
relatively slow speeds (due to the 
operating speeds of the terminals 
supported), while the messages, once 
delivered to the computer, can be processed 
at computer speeds. To fully utilize the 
computing system capabilities, message 
traffic must proceed asynchronously with 
message processing. This asynchronous 
method of execution is based on the 
completion of awaited events (for example, 
I/O termination), and on the established 
priorities of Foreground-one, 
Foreground-two, and Background. 
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PHYSICAL ORGANIZATION OF QOTAM 


This section describes the various parts of 
the total package called QTAM. Little is 
said of the function of the various pieces 
and even less of the logic of their 
operation. However, it is important to 
understand what the pieces are, where they 
come from, how they get into the system, 
and their relationship to the rest of the 
package. The following topics are 
discussed in this section: 


1. System Generation. 


2. Assembling and Linkage-Editing a 
Message Control Program. 


3. Assembling and Linkage-Editing a 
Message Processing Program. 


SYSTEM GENERATION 


When QTAM is called for during a system 
generation procedure (TP=QTAM operand in 
SUPVR SYSGEN macro instruction), a number 
of subroutines collectively called the QTAM 
Svc/Subtask Control routine are included as 
a part of the DOS Supervisor Nucleus. 

These subroutines are then always present 
in the system, regardless of whether a 
telecommunications application is being 
executed. 


The QOTAM nucleus routine consists of 
nine subroutines, each of which is 
discussed later in this manual. 

1. Entry Interface 

2s QTAM Wait 

3. QTAM Post 

4. Qdispatch 

5. Defer Entry 

6. Priority Search 

7. Queue Insert 

8. Exit Select 

9. Exit Interface 
Note: When TP=QTAM is specified, SVC 
Support for BTAM is also included in the 


nucleus; however, QOTAM has no requirement 
for this BTAM logic. 
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SOURCE STATEMENT LIBRARY: 


Other system generation considerations 
for including QTAM in the system are: 


1. Multiprogramming support (MPS=YES 
operand in SUPVR macro) must be 
included because QTAM requires at 
least two partitions in DOS. Because 
multiprogramming support is required, 
storage protection (SP=YES operand in 
CONFG macro) must be specified. 


2. The interval timer is required 
(TIMER=YES operand in CONFG macro) if 
the polling interval or time stamping 
options provided by QTAM are desired. 
Additionally, the timer must be 
assigned to the Foreground-1 partition 
(IT=F1 operand of FOPT macro) for the 
polling interval option. 


Note: When multitasking support is 
included in the DOS Supervisor (AP=YES 
operand in SUPVR macro instruction), a 
number of message procesSSing programs can 
Operate in the system. The maximum number 
of message processing programs to be 
Supported is defined at system generation 
(TP=OTAMn where n is equal to the number of 
message processing programs). 


After a system generation has been 
performed, the various QTAM components are 
in the system libraries on the SYSRES 
volume. The distribution of the OTAM 
components is described as follows. 


All QOTAM macro 
definitions called for during the assembly 
of message control and message processing 
programs reside in this library. Appendix 
C lists all QTAM macro instructions and 
indicates what the expansion is for each. 
QTAM DSECTS are also included in the Source 
Statement Library and may be included in an 
assembly via a COPY statement. 





CORE IMAGE LIBRARY: The QTAM SVC/Subtask 
Control routine is a part of the Supervisor 
nucleus that resides in this library. QTAM 
transient routines also reside in this 
library; these routines (QTAM Open and 
Close executors) are dynamically fetched 
into the logical transient area as needed 
for execution. 


RELOCATABLE LIBRARY: The remaining 
components of QTAM are the logic modules 
required to implement the functions 
provided by QTAM. These modules reside in 
the relocatable library and include: 


a 








1. Macro-Introduced Modules. These 
modules correspond to QTAM macro 
instructions. Each module performs 
the function represented by its 
associated macro instruction, whose 
expansion generates linkage to the 
module. Also included in this 
category are certain second-level 
modules that perform generalized 
functions required by two or more 
modules directly associated with a 
macro instruction. In this 
publication these modules, whether 
first or second-level, are defined as 
External Routines. 


2. QTAM Implementation module (IJLQIP). 
3. Physical Input/Output module (IJLORW). 


4. Line Appendage module for PCI and 
Program Check (IJLQLC). 


5. Normal Line End Appendage and ERP 
module (1EDQLA). 


6. Disk Input/Output module (IJLQDA). 
7. Audio Line Appendage module (IJLQAA). 
8. 7/72 Disk Appendage module (IJLQAD). 


9. GET/PUT logic modules. Seven GET 
modules and four PUT modules are 


provided. The PUT and four of the GET 
modules correspond to the 
message/segment/record/audio message 
options. The other GET modules 
correspond to the three combined 
options of audio message with message, 
segment, or record. 


10. WTTA Line Appendage module (IJLQTA). 


Appendix D contains an alphabetical 
listing of all the QTAM logic modules. 


ASSEMBLING AND LINKAGE-EDITING A MESSAGE 
CONTROL PROGRAM 


The user codes the QTAM macro instructions 
necessary to design a message control 
program. The output of this assembly 
includes several tables and control blocks, 
a buffer area, linkages to QTAM external 
and transient routines, and, except for 
these linkages and a few minor Line 
Procedure Specification (LPS) macro 
instruction expansions, very little other 
executable code. The message control 
object module may include some user-written 
routines, but these will normally not be 
extensive. 


The assembled object module is then 
link-edited to include the necessary 
external routines from the relocatable 
library. These external routines are the 
LPS routines used in processing header 
information, translating from one code to 
another, directing messages to the proper 
lines and queues, etc. The remainder of 
the required QTAM logic modules are also 
incorporated (via V-type address constants) 
into the message control program during 
this linkage-editing procedure. 


A large module called the QOTAM 
Implementation module (IJLQIP) is included 
from the relocatable library, because of a 
V-type address constant generated in the 
expansion of the DTFQT macro for the DASD 
queues, the 7772 DCV vocabulary, and the 
7770 line group files. The Implementation 
module contains two distinct types of 
routines - distinct as far as their logical 
relationship to the rest of the system. 
The two types are: 


1. Problem program routines, executed 
enabled to all interruptions as part of 
the message control program. These 
routines receive control through branches 
from the external routines that are 
link-edited with the message control 
program. 


2. Supervisory routines, executed 
disabled to all interruptions, as part of 
the QOTAM nucleus “task." These routines 
receive control through branches from the 
OTAM SVC Subtask Control routine in the 
nucleus. 


The Line Appendage, Audio Line 
Appendage, WTTA Line Appendage, and Disk 
I/O modules are link-edited from the 
relocatable library because of V-type 
address constants generated by the DTFOT 
macros for the Line Group, WTTA line group, 
Audio Line Group, and DASD Queue files, 
respectively. The 7772 Disk Appendage is 
link-edited from the relocatable library 
because of a V-type address constant 
generated by the BUFARU macro instruction. 
All these modules contain a third distinct 
type of routine: the I/O Appendage. These 
I/O appendages are executed disabled to all 
interruptions, again logically as part of 
the QTAM nucleus “task." The appendages 
receive control from the I/O Interruption 
Handler routine in the DOS Supervisor. 


Note: The logical relationship of the two 
types of routines in the Implementation 
module with each other and with the I/O 
appendages is discussed more fully in the 
next section. From the point of view of 
physical organization, this collection of 
routines represents no more than a 
convenient and efficient packaging’ 
technigue. The Implementation module, 
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together with the I/O appendages, can in no 
way be thought of as a “program." 


The last module linkage-edited into the 
message control program is the Physical I/O 
module. It is included because of a V-type 
address constant generated, again, by the 
expansion of the DTFQOT macro for the DASD 
Queues file. This module contains routines 
that generate and initiate execution of 
channel programs on the communication 
lines. These routines run in problem 
program state as part of the user's message 
control program. 


The resulting output of the Linkage 
Editor run is then cataloged as a single 
phase into the core image library, 
be loaded for execution. This message 
control program phase must be executed in 
foreground-1, the highest priority 
partition in the system. 


ASSEMBLING AND LINKAGE-EDITING A MESSAGE 
PROCESSING PROGRAM 


A message processing program normally needs 
only the OPEN, CLOSE, GET, and PUT macro 
instructions and some file definition macro 
instructions. When this is the case, no 
QTAM external routines are required to be 
link-edited with the assembled object 
module. The only QTAM modules 
linkage-edited with the assembled object 
module are the selected GET and PUT 
modules. The modules selected depend on 
the unit or combination of units of data 
processed by the program: record, segment, 
message, or audio message. 


The appropriate GET module(s) are 
included from the relocatable library 
because of a V-type address constant 
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ready to 


generated by the expansion of the DTFOT 
macro for the Main Storage (MS) Process 
Queue(s). The appropriate PUT module is 
included because of a V-type address 
constant generated by the expansion of the 
DTFOT macro for the MS Destination or Audio 
Output Queues. 


An installation also writes at least one 
message processing program that uses the 
following macro instructions to examine and 
modify the status of the message control 
program and/or to initiate termination of 
the message control program: 


CHNGP 
CHNGT 
CKREQ 
CLOSEMC 
COPYC 
COPYP 
COPYQ 
COPYT 
RELEASEM 
RETRIEVE 
STARTARU 
STARTLN 
STOPARU 
STOPLN 


When any of these macros are used, the 
linkage editor includes the corresponding 
external routines in the load module. 


The resulting output of the Linkage 
Editor run is then cataloged into the core 
image library, ready to be loaded for 
execution. The message processing program 
phase may be linkage-edited to execute in 
either the foreground-2 or the background 
partition. With multitasking, however, it 
is possible to execute several processing 
programs in the foreground-one partition as 
tasks with lower priorities than the 


message control task. 


—_ 


“ 











The preceding section explained how the 
physical pieces of QTAM are positioned in 
Main storage. This section explains how 
these pieces are logically related and how 
they pass control back and forth. 


In this section, the logical 
organization of QOTAM is discussed within 
two different frameworks. First, QTAM is 
considered as a part of operating system 
task management and within the structure 
and categories of that control program. 
Then QTAM is considered as a separate 
logical entity outside of the framework of 
the operating system control program, and 
iS viewed aS a control program in its own 
right. The key to understanding the 
logical organization of QTAM lies in 
understanding the overlap of the two 
control program structures. 


OTAM WITHIN THE DISK OPERATING SYSTEM 
CONTROL PROGRAM STRUCTURE 


The various pieces discussed under Physical 


Organization of QTAM can be grouped into 
three logical categories: 


1. The Message Control Program 
2. Message Processing Program(s) 
3. The QTAM Supervisory Routines 


The message control and message 
processing programs are both run under 
control of the DOS task management 
routines. From the point of view of DOS 
task management, they are in no way 
different from any other problem programs. 
They are scheduled and dispatched according 
to the priorities indicated in the Program 
Information Blocks (PIBs) for the 
partitions in which they are being run. 


The third category, QTAM Supervisory 
Routines, is all that is left over after 
distinguishing and separating the two 
processing programs. These routines are 
executed as SVC handling routines or as 
asynchronously scheduled I/O interruption 
handling routines. Strictly speaking, they 
are executed as part of the message control 
and message processing programs. 
Practically speaking, however, it is more 
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meaningful to think of these as a separate 
category, outside of the task framework 
established by DOS task management. The 
discussion in this section is primarily an 
attempt to explain the nature of this third 
category as it is to be understood in | 
relation to the other two. The discussion 


continues under QTAM Supervisory Routines. 


MESSAGE CONTROL PROBLEM PROGRAM 


The message control problem program 
includes the following: 


1. The object module output from the 
assembly of the user's code. 


2. The external routines link-edited with 
the assembly output. 
Note: If the LIST macro instruction 
is used, a Single supervisory routine 
called the Distribution List routine, 
in a module named IJLODL, is 
link-edited into the message control 
load module. This routine isS one of 
the supervisory routines, and is not 
part of the problem program. 


3. Three of the routines in the 
Implementation module: 


e LPS Control 
° Buffer Recall/Cleanup 
° Free BRB 

4. The QTAM Physical I/O module. 


5. Two routines link-edited with the 
Audio Line Appendage module: 


e ARU Receive 
® ARU Internal 


Figure 1 shows a simplified flowchart of 
this problem program. The flowchart is 
included here to show how the three problem 
program routines in the Implementation 
module, the QTAM Physical I/O module , and 
the two audio routines are related to the 
rest of the message control program. 
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Figure i. Message Control Problem Program 
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MESSAGE PROCESSING PROBLEM PROGRAM 


A message processing problem program 
includes the assembled user code and 
external routines link-edited with it, 
including the GET, PUT routines. The only 
difference between a QTAM message 
processing program and any other processing 
program is the requirement for and the 
implementation of cross-partition 
communication. The various macro 
instructions that can be used ina message 
processing program are handled as follows: 


1. COPYP, COPYT, and COPYQ present no 
problem. The corresponding external 
routine Simply reads the requested 
information from the foreground-one 
partition uSing address pointers 
stored in a QTAM vector table and in 
the terminal table. 


2. All other macro instructions cause SVC 
interruptions to the QTAM supervisory 
routines. Any cross-partition 
communication is done by the 
Supervisory routines, operating under 
the storage protection key of the 
Supervisor. 


From the point of view of logical 
organization, unusual operations are 
noticed in the following cases: PUT, GET 
(for audio processing), CLOSEMC, STARTARU, 
and STOPARU macro instructions. To avoid 
including a large amount of code in 
supervisory routines for each of the 
corresponding modules, certain code that 
must be executed in supervisor state is 
packaged within these modules. The SVC 
routine entered as a result of one of these 
macro instructions branches back to these 
sections of code in the corresponding 
problem program modules to execute them in 
supervisor state. 


Note: Operations under extended 
multiprogramming capabilities 
(multitasking) that allow one-partition 
processing do not differ from the above 
description. 


OQTAM SUPERVISORY ROUTINES 


Within the framework of the DOS control 

program is the third category, the QTAM 

supervisory routines. From the point of 
view of physical organization, the QTAM 

supervisory routines consist of: 


1. The QTAM subroutines within the 
Supervisor nucleus. 


2. Those routines within the 
Implementation module (in partition 
Fi) that are executed in supervisor 
state. This includes all but the 
three identified as part of the 
message control problem program. 


3. The Disk I/O, Line Appendage, IBM 2260 
Appendage, and the optional WTTA Line 
Appendage modules. 


4. The Distribution List routine 
link-edited with the message control 
program. 


5. The optional IBM 7772 Disk Appendage 
and Audio Line Appendage modules, 
except the two audio routines 
link-edited with the Audio Line 
Appendage and part of the message 
control program. 


6. Part of the GET (for audio 
processing), PUT, CLOSEMC, and 
STARTARU/STOPARU modules in the 
message processing problem program 
partition(s). 


7. The Checkpoint routine link-edited 
with the message control program when 
the checkpoint/restart option is 
specified. 


From the point of view of the 
interruption handling facilities of the 
Disk Operating System, the OTAM supervisory 
routines consist of: 


1. SVC routines, entered by SVCs 30 and 
31 from problem program partitions. 


2. Asynchronously scheduled I/0 
interruption handling routines, 
entered from the DOS I/O Interrupt 
Handler. 


While both of these points of view are 
correct, neither is very helpful in 
understanding the logical organization of 
QTAM. For example, a routine within a QTAM 
appendage to which control is passed to 
process an I/O interruption may also be 
executed as the result of an SVC 
interruption. The problem is that both 
points of view are taken from within the 
framework of the DOS Control Program 
environment and are seen within the 
categories of that system. The solution to 
the problem lies in understanding the 
implications of the statement: 


"OTAM is a Control Program" 


OTAM is a control program, and it 
happens to be within a second control 
program. Later, it will be explained how 
the two overlap. First, however, let us 
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look at the QTAM control program within its 
own framework as a separate logical entity. 


OQTAM .AS A SEPARATE CONTROL PROGRAM 


The one essential function of a control 
program is allocation of system resources. 
The system resources to be allocated by 
QTAM are: 


1. CPU processing time 
2. Main storage space 
3. I/0 paths 


To perform this allocation function 
efficiently, QTAM breaks the system 
resources into the smallest practical 
number of pieces, as follows: 


1. The work to be done is broken into 
many Separate units called QTAM 
subtasks. Small pieces of the time 
resource are then allocated to 
individual subtasks. 


2. The main storage space to be allocated 
is broken into a large number of 
buffers. Only that amount of storage 
absolutely required at a given time 
need be tied up for a given function. 


3. The I/O paths controlled by QTAM are 
the communication lines and the disk 
queue. Only that I/O path absolutely 
required at a given time need be tied 
up for a given function. 


Allocation of the time resource is 
called scheduling, while “allocation" 
usually refers to physical resource 
allocation only. However, one of the most 
important design attributes of the QTAM 
Control Program, distinguishing it from 
other possible designs (including the Disk 
Operating System itself) is that the entire 
allocation function is performed by a 
‘Single mechanism. This allows a complete 
interdependence of time allocation 
(scheduling) and physical resource 
allocation. Scheduling becomes a function 
of allocation, and allocation becomes a 
function of scheduling. 


The following sections describe the 
resource allocation mechanism of QTAM. The 
key to the mechanism is the QTAM Ready 
Queue. This Ready Queue is the structure 
through which a resource is allocated toa 
subtask. The actual mechanism of 
allocation is the QWAIT and QPOST 
operations performed by the QTAM subtasks. 
QWAIT, in effect, puts a request for a 
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resource on the Ready Queue. QPOST passes 
an available resource to the Ready Queue. 
The QTAM SVC Subtask Control routine 
performs a queue-management function that 
includes dispatching the subtask at the top 
of the Ready Queue. 


QUEUE MANAGEMENT 


Both physical resources and subtasks are 
represented to the queue management 
routines by control blocks. The resources 
are broken into elements, with each element 
represented by an Element Control Block 
(ECB). Subtasks are represented by Subtask 
Control Blocks (STCBs). Queues of elements 
are allowed to build up as a chain of ECB's 
starting with an address pointer in a Queue 
Control Block (QCB). Queues of requests 
for elements also may build up as a chain 
of STCBs starting with another address 
pointer ina QCB. A detailed description 
Of all control blocks used by QTAM is 
contained in Appendix B. 


Element Control Blocks 


Five main types of permanent Element 
Control Blocks (ECBs) are: 


1. Buffer ECBs. 

2. Communications line ECBs. 

3. Audio communications line ECBs. 
4. Buffer request ECBs. 

5. 7772 DCV buffer ECBs. 


Buffers are areas Of main storage that 
contain message data and/or control 
information. The first 8 bytes of each 
buffer comprise an ECB. As with all QOTAM 
elements, the "identity" of the buffer at a 
particular time depends solely upon the 
queue its representative ECB is chained 
into at that time. The buffer proper is 


always physically identifiable as a fixed 


number of bytes of main storage. 


If the ECB representing the buffer is 
chained into a QCB for a Destination queue, 
the buffer is full; that is, it contains a 
message segment to be transmitted to a 
destination. When the same ECB is 
subsequently chained into the Available 
Buffer OCB, the element involved is now an 
available buffer, even though there has 
been no change in the physical storage 
area. 











7772 DCV buffers are main storage areas 
that contain the digitally coded voice 
(DCV) words dynamically retrieved from the 
7772 DCV vocabulary file. The first eight 
bytes of each 7772 DCV buffer comprise an 
ECB. An ECB representing an available 7772 
DCV buffer is chained into the QCB for the 
corresponding 7772 DCV buffer queue. An 
ECB representing a nonavailable 7772 DCV 
buffer is associated with an operative 
audio line. 


Audio and nonaudio communications lines 
are represented to QTAM through the Audio 
Line Control Block (ALCB) and the Line 
Control Block (LCB), respectively. There 
is an LCB or an ALCB for each line. 
Therefore, the LCB and the ALCB themselves 
are treated as the resource element. The 
ECB iS contained in the first eight bytes 
of the LCB or ALCB. 


To avoid preassigning buffers before 
they are actually needed, QTAM uses Buffer 
Request Blocks (BRBs) to queue buffer 
requests, which is explained later (see 
Outline of QTAM Operation). These BRBs are 
elements. The ECB is contained within the 
BRB. The number of BRBS in the system is 
determined by the number of buffers in the 
buffer pool; there is one BRB per buffer. 
Thus, this pool of BRBs is itself a pool of 
resources to be allocated to the various 
subtasks that use them. 


Subtask Control Blocks 


The two types of Subtask Control Blocks 
(STCBS) are: 


1. Truncated STCBS 
Zs Full STCBS 


Truncated STCBsS represent subtasks that 
are executed in Supervisor state. These 
subtasks are performed by routines that are 
packaged within the following modules: 
QTAM Implementation, Disk I/O, Audio Line 
Appendage, 7772 Disk Appendage, GET (for 
audio processing), PUT (for audio 
processing), CLOSEMC and STARTARU/STOPARU 
(but also including the Distribution List 
routine linked with the message control 
program). These routines are called 
implementation routines and the truncated 


STCB represents an implementation subtask. 


Full STCBs represent subtasks that are 
executed in problem program state. These 
Subtasks are performed by the message 
control and message processing problem 
programs. At this point there is an 
overlap of the Disk Operating System 
control program structure with the QTAM 


control program structure. A QTAM problem 
program subtask is created when an SVC 30 


or 31 is issued within a Disk Operating 


System task. More specifically, a control 
block called a full STCB is initialized to 
represent the problem program subtask and 
is used as a QTAM STCB. As a subtask then, 
the problem program is placed under the 
subtask management of QTAM and must contend 
for control in that multitask environment 
before it is released to contend with other 
Disk Operating System tasks in the system. 
This is explained more fully in the 
following sections. 


Note at this point, however, that every 
problem program request that results ina 
OTAM SVC 30 or 31 causes a subtask to be 
created. These problem program subtasks 
are always lower in priority than any QTAM 
implementation subtask; thus, they are 
never considered for dispatching until all 
of the internal implementation subtasks 
have done all of the work that can be done 
with the resources available. There is one 
full STCB per problem program task 
preassembled into the QTAM nucleus. 


Queue Control Blocks 


The QTAM Ready Queue can be thought of as a 
queue of queues, each queue being 
associated with a QCB. The following is a 
list of various types of queues that may 
appear at any given time on the Ready 
Queue. A more complete and detailed list 


is given in Appendix A. 


AVAILABLE BUFFER QUEUE: This queue keeps 
track of unassigned buffers. The element 
chain is the chain of all buffers that are 
currently not assigned. AS Soon aS a 
buffer is no longer needed, it is posted to 
this gueuve. The STCB chain for this QCB is 
limited to the STCB for the Available 
Buffer subtask that is used whenever a 
buffer is made available. 


LPS QUEUE: This queue passes elements from 
the QTAM control program to the message 
control problem program. As shown in 
Figure 1, the element chain may point to: 


1. An empty buffer, signifying that a 
line-read operation is to be 
initiated. 

2. A message-filled buffer to be passed 
through some portion of the LPS 
section. 

3. A request for a disk I/O operation to 
be started. 
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4. An ALCB with a full audio input buffer 
to ve passed through an ARU/LPS 
section. 


5. An ALCB requesting an I/O operation on 
an audio line. 


6. A 7772 DCV buffer requesting a disk 
read operation. 


This is the QCB that the LPS Control 
routine in the message control problem 
program waits on. 


MAIN STORAGE PROCESS QUEUE: This queue 
passes full buffers from the QTAM control 
program to a message processing program. 
The element chain is the chain of buffers 
containing the message unit that is passed 
to the message processing program. This is 
the QCB that a message processing program 
GET waits on. 


DASD DESTINATION AND DASD PROCESS QUEUES: 
There is a QCB for every destination queue 
and every process queue defined by the TERM 
and PROCESS macro instructions in the 
message control program. When a buffer is 
posted to one of these queues, it is never 
physically chained to the QCB. Instead, 
the buffer is posted directly to the Ready 
queue and, when it reaches the top, it is 
removed and the indicated QCB is put in its 
place. The STCB chain from one of these 
QCBS always ends with the STCB for the DASD 
Destination subtask. It may be preceded by 
the STCB for the line's Send Scheduling 
subtask (if it is a destination queue) or 
the GET-Scheduling subtask (if it is a 
process queue). 


INACTIVE BRB QUEUE: 


of inactive buffer request blocks. The 
element chain is the chain of all BRBs that 
are not currently assigned. The STCB chain 
may contain the STCB for a line's 
Receive-Scheduling subtask and/or one or 
more Send-Scheduling subtasks. 


ACTIVE BRB QUEUE: This queue passes active 
buffer requests from the various subtasks 
that require buffers to the Active Buffer 
Request subtask, which obtains the buffers. 
The element chain is the chain of active 
BRBs. The STCB chain is limited to the 
STCB for the Active Buffer Request subtask. 


ADDITIONAL-CCW QUEUE: This is a queue of 
special purpose BRBs containing the CCWs 
used to transmit idle or other specified 
characters when certain line control 
characters are encountered in an outgoing 
message. When one of these line control 
characters is encountered by the Pause 
routine in the Send portion of the LPS, the 
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This queue keeps track 


problem program waits on this queue to 

Obtain one of these BRBS. All Pause BRBs we 
initially appear in the element chain of , 
this queue as a result of the BUFFER macro Se 
expansion. 


DISK INPUT/OUTPUT QUEUE: BRBS containing 
channel command words are posted to this 
queue when a disk read operation is 
required. Full buffers are posted to the 
same queue for writing messages out on the 
disk. The STCB chain is limited to the 
STCB for the Disk Inout/Output subtask. 


COMMUNICATIONS LINE QUEUE: There is one 


QCB for each communication line. The OCB 
is created in the LCB itself when the LCB 
is encountered on the Ready Queue, as 
follows: 


1. When a send or receive operation is 
completed, the LCB is posted to the 
Ready Queue as an element. 


2. When the LCB reaches the top of the 
Ready Queue, a field within it is 
initialized as a QCB. 


3. The element chain is then completed by 
posting the LCB to itself. 


4. A Receive-Scheduling subtask is then 
created for the line unless there is 
already a Send-Scheduling subtask fo 
waiting for the line. 


ARU_ SEND QUEUE: There is only one OCB for 
all communications lines. This QCB is part 
of the audio implementation programs 
link-edited with the Audio Line Appendage 
module. ALCBs containing a full 
address-chain buffer are posted to this 
queue to send the audio output message on 
line. The STCB chain is limited to the 
STCB for the ARU Send subtask. 


7772 DCV BUFFER QUEUE: There is a OCB for 
each 7772 Audio Response Unit with at least 


one line using DCV words dynamically 
retrieved from the 7772 vocabulary file. A 
OCB created in the message control program 
through the BUFARU macro expansion keeps 
track of the unassigned DCV buffers of one 
or more 7772 line groups. The element 
chain is the chain of all DCV buffers that 
are currently not assigned to the 
corresponding 7772 line groups. As soon as 
a DCV buffer is no longer needed, it is 
posted to its queue. The STCB chain for 
this QCB generally contains the STCB for 
the Queue Insert subtask, but it may 
contain the 7772 DCV buffer subtask when no 
DCV buffer is available and one or more 
audio lines are waiting for an available 
DcV buffer. 











QWAIT AND QPOST 


A subtask requests a resource from a queue 
by issuing a QWAIT on the associated QCB. 

A subtask passes a resource with which it 
is finished to another subtask or a problem 
program by QPOSTing the resource to the 
proper QCB. 


QWAIT from Problem Program 


A problem program (either message control 
or message processing) requests an element 
from the Ready Queue by issuing an SVC 30. 


All QTAM SVC"'S are macro-generated. 
The problem programmer should never 
have to issue one directly. 


Note: 


The Supervisor SVC Interrupt Handler 
initializes a PIB and passes it to the 
Entry Interface subroutine in the QOTAM 
SVC/Subtask Control routine. The PIB 
information is used to initialize a full 
STCB to represent re-entry to the QTAM 
problem program, and the requesting program 
is placed in the wait state. 


The full STCB contains the address of a 
special QCB labeled QSVCQCB. The address 
of the QCB for the element queue being 
waited on is passed in register 0. If the 
element is available, its address is placed 
in register 1; the requesting program is 
removed from the wait state, and control is 
passed to the problem program via the DOS 
Supervisor task selection mechanism. 


If the element is not available, the 
full STCB is chained to the QCB of the 
element chain being waited on. The 
requesting problem program is left in the 
wait state, and control is returned to the 
System Supervisor. The DOS task selection 
routine then dispatches some other task if 
there is one waiting (for example, a 
message processing program in a lower 
priority partition). Otherwise, it places 
the entire system in the wait state. 


When some other subtask subsequently 
posts an element to the queue that the 
problem program waited on, the problem 
program will be dispatched by QTAM by 
turning off the wait flag in the PIB for 
the program. The problem program will then 
be dispatched in its proper task priority 
by Disk Operating System task management. 


QPOST from Problem Program 


A problem program (either message control 
Or message processing) passes an element to 
the Ready Queue by issuing an SVC 31. As 
with the QWAIT, the full STCB contains the 
address of, and is chained to, the QSVCQOCB 
QCB. The QCB of the queue that the element 
is being posted to is passed in register 0 
and the address of the ECB for the element 
being passed is in register 1. The ECB is 
placed on the Ready Queue. If a subtask is 
waiting for the element, it is dispatched. 
If no subtask is waiting for the element, 
the ECB is chained to the proper QCB. When 
all items on the Ready Queue are 
dispatched, the problem program regains 
control. 


QWAIT from Internal Implementation Subtask 


When one of the implementation subtasks 
requires an element, it looks directly at 
the QCB for the element queue being waited 
on. If the element is available, the 
subtask removes it from the chain and 
continues (relinking the element chain, if 
necessary). No SVC is issued. 


If the element chain is empty, the 
subtask branches directly to the queue 
Management routines in the QTAM SVC/Subtask 
Control routine. If the STCB for the 
requesting subtask is not already chained 
to the QCB for the requested element, it is 
placed on that chain. Control then passes 
to the Qdispatch subroutine to activate the 
next subtask. 


OPOST from Internal Implementation Subtask 


When one of the QTAM implementation 
subtasks has an element to pass to the 
Ready Queue, it branches directly to the 
Post subroutine in the QTAM SVC/Subtask 
Control routine (no SVC is issued). The 
ECB is placed on the Ready Queue and 
contains the address of the QCB to which it 
was posted. The STCB for the subtask that 
posted the element is left chained to the 
OCB that it was already on and that subtask 
resumes operation. 


A QWAIT chains the STCB of the 
requesting subtask to a QCB. The QCB may 
or may not be on the Ready Queue. A QOPOST 
places an element's ECB directly on the 
Ready Queue. The ECB contains a pointer to 
the QCB to which it is posted. When the 
ECB reaches the top of the Ready queue, it 
is replaced at the top by the QCB and the 
first subtask chained to the QCB is 
dispatched. 


summary: 


Logical Organization of QTAM 21 


ODISPATCH 


The QTAM SVC/Subtask Control routine in the 
Supervisor nucleus provides the overall 
queue management EACTITETES which include: 


1. Interfacing with ee Disk operated 
System Supervisor. 


2. Placing problem programs in wait 
state; then posting them complete. 


3. Chaining ECBs to the Ready Queue and 
STCBS to QCBs in the proper priority 
sequence. 


4, Dispatching the highest priority 
subtask. 


The QTAM nucleus routine is comprised of 
several subroutines, and each is discussed 
in the section QTAM SVC/Subtask Control 
Routine later in this manual. At this 
point, however, we can look at the queue 
management facility as a whole. 


Figure 2 shows a very generalized 
flowchart of the QOTAM nucleus. Part 1 
illustrates the preceding discussion of the 
QPOST and QWAIT. The test made at E2 is 
the Qdispatch function. The Qdispatch 
subroutine examines the item at the head of 
the Ready Queue. 


The position of all items on the Ready 
Queue is determined by the relative 
priorities of elements as they are posted 
to the queue. Generally speaking, the 
priority of an element is determined by the 
type of subtask to which it is being 
passed. There are seven commonly used 
priorities, indicated by a hexadecimal code 
in the ECB. 


HIGHEST CODE (FE): This highest priority 
code is given to special audio elements 
enabling truncated subtasks to be 
dispatched immediately. These subtasks, 
executed in Supervisor mode, are located in 
the four GET modules working on audio 
messages, the audio PUT, CLOSEMC and 
STARTARU/STOPARU modules. 


SECOND-HIGHEST CODE (FD): This priority is 
given to all audio elements (Audio Line 
Control Blocks, 7772 DCV buffers) being 
processed by the message control program. 


THIRD-HIGHEST CODE (FC): This priority is 
given to all Audio Line Control Blocks 
being passed to message processing 
programs. 





FOURTH-HIGHEST CODE (EC): The only element 
ever given a code of EC is a BRB. This is 
done in two instances: 
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1. When the buffer request is for a disk 
Operation. This is done to optimize 
Scanning the disk queue area. 


2. When the buffer request is made by the 
Line PCI routine following the first 
PCI on a line-receive operation. The 
high priority causes additional 
buffers needed for a line-read 
operation to be assigned as rapidly as 
possible. 


FIFTH-HIGHEST CODE (F4): This priority is 
given to all nonaudio elements being passed 
to implementation subtasks that run 
disabled to interruption. 


SIXTH-HIGHEST CODE (EO): This priority is 
given to all nonaudio elements being pasar 
to the message control program. 


LOWEST CODE (DC): This lowest priority 
code is given to all nonaudio elements 
being passed to message processing 
programs. 


Qdispatch follows the address pointer in 
location QOSVCRDYQ to the item at the top of 
the Ready Queue. The item will be either 
an ECB or a QCB. QdisSpatch examines the 
key field in the first byte to determine 
what the item is: 


Key = 0: All ECB"s have a key of zero. 
Nete: There is one special case where a 
full STCB appears directly on the Ready 
Queue instead of chained to a QCB. This is 
the full STCB created during 
initialization, after the ENDREADY macro 
instruction is executed and the first QTAM 
Svc is issued in the LPS Control routine. 
This full STCB appears to Qdispatch as an 
ECB pointing to a location labeled QSVCQCB 
at QOSVCRDYQ-8. Therefore, the address at 
location QSVCRDYQO appears as the head of a 
STCB chain in a pseudo QCB labeled QSVCQCB 
and the program represented by the full 
STCB iS given control. 


There is always a subtask waiting on the 
element, though in some cases it may be 
Only an interim subtask that removes the 
element from the Ready Queue and chains it 
to a OCB element chain (i.e., the Queue 
Insert subtask. ) 


Key = 2: A key of two indicates a QCB with 
a subtask at the top of its STCB chain that 
is “ready", or “not waiting" for an 
element. The STCB was chained to the OCB 
as the result of a QPOST. It will now 
regain control. 


Key = 3: A key of three indicates a QCB 
with a subtask at the top of its STCB chain 
that is “not ready", or “waiting" for an 
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element. The STCB was chained to the QCB 
as the result of a QWAIT. Note that if an 
element had been available, the subtask 
that issued the QWAIT would have regained 
control without the Qdispatch routine being 
entered. Because the element is not 
available, the key of the QCB is set to 1, 
and the link address is changed to remove 
the QCB from the Ready Queue. 


The flowchart in Figure 2 further shows 
how control is passed to the dispatched 
Subtask. If the subtask is represented by 
a truncated STCB, the Exit Select 
Subroutine simply branches to the entry 
point of the implementation subtask. If it 
is a proolem program (full STCB), the Exit 
Interface routine posts completion of the 
Svc in the PIB for the program and returns 
control to the Supervisor. If the SVC 
request from the problem program could not 
be satisfied, completion is posted ina 
dummy PIB before return to the Supervisor, 
and the problem program remains in the wait 
state. 


In the latter case, QTAM is placing one 
problem program in wait state and enabling 
another problem program that was previously 
placed in wait state, or that was ready but 
in a lower priority partition, to be 
dispatched again by the Disk Operating 
System task supervisor. 


One dummy element control block 
indicates the end of all element chains and 
is permanently the last item on the Ready 
Queue. When this ECB reaches the top of 
the Ready Queue, the last OTAM problem 
program is placed in wait state. 


INITIAL STATUS OF THE QTAM CONTROL PROGRAM 


This section describes briefly the initial 
Status of OTAM, that is, the Status at the 
time the message control program phase is 
loaded from the core image library for 
execution. The initial status of the QOTAM 
queues and the initial location of the 
primary resources are represented by the 
assembly listings of the various QTAM 
components and are summarized here. 
Detailed information concerning the initial 
Status of QTAM can be obtained from the 
assembly listings. 


Ready Queue: The initial item at the top 
of the Ready Queue is a full STCB to be 
used for handling the first QTAM SVC issued 
in a problem program. 


Available Buffer Queue: All buffers 
initially appear in the element chain of 
this queue as a result of the BUFFER macro 
expansion. 


24 DOS QTAM Program Logic Manual 


Additional-CCW Queue: All Pause BRB/CCWs 


initially appear in the element chain of 
this queue as a result of the BUFFER macro 
expansion. 


Inactive-BRB Queue: All BRBsS initially 
appear in the element chain of this queue 
as a result of the BUFFER macro expansion. 
The STCB chain initially contains the STCB 
for the Queue Insert subtask. 


Communication Line Queues: There is one 


such queue for each line in the system. 

The QCB is contained in the LCB generated 
by the expansion of the DTFOQT macro for the 
line group file. If receiving (CPRI=R) or 
equal (CPRI=E) priority is specified, the 
STCB for the Receive Scheduler subtask is 
initially first in the line's STCB chain. 
If sending (CPRI=S) priority is specified, 
the STCB for the Qdispatch subtask is 
initially first in the STCB chain. 


DASD-Destination Queue: The element chain 


of this queue initially contains the dummy 
last element labeled IJLOQIP5F which 
indicates that no buffers are in the chain. 
Initially, the STCB for the line's Send 
Scheduler subtask is first in the STCB 
chain. 


DASD-Process Queue: The element chain 


initially contains only the dummy last 
element labeled IJLQIP5F. The first STCB 
is initially the one for the Get Scheduler 
subtask. 


ARU Send Queue: The element chain 
initially contains only the dummy last 
element labeled IJLQIP5F, which indicates 
that no ALCBS are in the chain. 


7772 DCV Buffer Queues: All DCV buffers 


associated with one or more 7772 line 
groups initially appear in the element 
chain of the corresponding queue as a 
result of the BUFARU macro expansion. The 
STCB chain initially contains the STCB for 
the Queue Insert subtask. 


All Other Queues: The element chain of all 
other queues initially contains either: 


1. The dummy last element (IJLOQIP5SF in 
module IJLQIP) which indicates that no 
elements are in the chain initially, 
but that elements may appear in the 
chain when execution begins; or 

2. The address of the queve itself which 
indicates that no elements ever appear 
on the element chain. The STCB chain 
for all queues not mentioned is 
limited to the STCB for the subtask 
having the same name as the queue. 

For example, the STCB chain of the 
Disk I/O queue initially contains, and 
is limited to, the STCB for the Disk 
I/O subtask. 7 








This section describes the functional flow 
of QTAM operations at the component level. 
QTAM is composed of five major functional 

components: 


1. Message control problem program-- The 
portion of the message control program 
phase that executes in problem program 
State. Hereafter, in this discussion, 
this component is referred to simply 
as the message control program. 


2. Message procesSing programs-- One or 
more message processing programs may 
be executed in the foreground-one 
(only with multitasking), 
foreground-two, and/or background 
partitions. 


3. QOTAM nucleus-- The SVC/Subtask Control 
routine is the supervisor-resident 
component of QTAM that handles QTAM 
Svcs and controls the dispatching of 
OTAM subtasks. 


4. QTAM subtasks-- A portion of the 
message control program phase that 
executes in Supervisor mode as a 
logical extension of the QTAM nucleus. 
Each subtask is represented to the 
QTAM nucleus by a STCB and is selected 
for execution when the unit of work it 
performs is required. 


5. QTAM appendages-- A portion of the 
message control program phase that 
services interruptions caused by QTAM 
line or disk operations. This 
component runs in supervisor mode and 
is entered from the DOS Supervisor 
each time an interruption caused by a 
QTAM input/output operation occurs. 


Note: QTAM transient routines might 
be considered as a sixth major 
component. However, for the sake of 
continuity, the QTAM Open routine is 
discussed as a part of the message 
control or message processing program 
depending on which type of QTAM file 
is being opened. 





This section discusses the following 
three major subjects, since all QOTAM 
operations (audio and nonaudio) use the 
same message control and message processing 
programs: 


1. The message control program. This 
describes step by step the total 
process initiated for receiving and 
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sending a message over a communication 
line. 


2. The message processing program. This 
describes the message transfer to and 
from a message procesSing program. 


3. IBM 2260-2848 Local operations. This 
describes the operations for the IBM 
2260-2848 Local Display Complex, with 
emphasis on the areas differing from 
remote operations. 


The interaction of the QTAM subtasks and 
appendage is extensive for both operations. 
Therefore, descriptions of these components 
are included as required in both subjects. 


Because the functional flow of audio and 
nonaudio operations is very different, each 
major subject is covered in two sections: 
nonaudio and audio applications. 


Processing in all the QTAM components is 
initiated as a result of interrupts (SVC, 
disk, and line) that occur during the 
receiving and sending of a message or the 
transferring of a message to or froma 
message processing program. These 
interrupts result in the processing of one 
or more asynchronously operating subtasks 
and/or an appendage. The QTAM subtasks 
communicate with one another and with the 
message control or processing program by 
means of the OPOST and QWAIT functions (see 
section on QPOST and QWAIT). When a 
subtask (or program) has an element to be 
processed by another subtask, the QPOST 
function is used. When a subtask (or 
program) is ready to receive an element, 
the QWAIT function is used. Subtask 
selection is performed by the QTAM nucleus 
and is controlled by the ordering of items 
on the Ready queue as discussed previously 


under Queue Management. 


To avoid excessive repetition, the 
operation of the QTAM nucleus which is 
entered to perform a QPOST or QWAIT 
function is not included in this 
description. Instead, the switch from one 
subtask to another is indicated by "*** 
ENTER subtask name SUBTASK*¥*#*". The return 
to a problem program (message control or 
processing) that issued a QPOST or QWAIT is 
indicated in a similar manner. 


Note: The following discussion assumes 
that multitasking support is not included. 
This affects terminology rather than QTAM 
operations. 
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The interference of one line with 
another is handled by the queueing provided 
within the QPOST/QWAIT functions. For this 
reason and for the sake of simplicity, the 
operation of more than one line is not 
discussed. In this manner, the logical 
sequence of events for an operation can be 
described without regard to other items on 
the Ready queue or unrelated interrupts 
that may occur. For example, when an 
element is posted to a queue, it is assumed 
that no unrelated subtask is contending for 
control; therefore, the subtask associated 
with that queue is activated immediately. 


Appendix E is a foldout chart showing 
the functional flow of the four QTAM 
components discussed in this chapter. The 
four major components are separated by 
solid lines. The subtasks, appendages, or 
modules within a component are divided by 
broken lines. The labels on the chart are 
the names of routines or LPS subgroups and 
define the boundaries of a particular 
routine or subgroup. Detailed discussions 
and flowcharts of all the routines 
described in this chapter are contained 
elsewhere in this publication (refer to the 
table of contents for page numbers). 


MESSAGE CONTROL PROGRAM FOR A NONAUDIO 
APPLICATION 


After the message control program phase has 
been loaded from the core image library 
into the foreground one partition, it is 
entered for execution by the DOS 
Supervisor. 


***ENTER MESSAGE CONTROL PROGRAM*** 


INITIALIZATION 


1. QTAM Open Monitor/Open DASD Message 


Queues File Routine, Phase 1: The 
address of the QTAM Vector Table is 


placed into the DOS Communication 
Region so that QTAM routines requiring 
information from the Vector Table can 
access it. The extent data for these 
QOTAM files is read, and the File 
Protect subroutine is called into the 
transient area. It is passed a 
parameter directing it to call into 
the transient area the open module 
that must be executed next. 


2. Open DASD Message Queues File Routine, 
Phases 2 and 3: If the DASD Message 


Queues file is a multivolume file, 
this routine prepares the proper 
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initialization functions. Extent data 
for the next extent (if any) is read, 
and Phase 3 is called into the 
transient area. Phase 3 tests if this 
is the last extent for the file. If 
yes, return is made through the File 
Protect subroutine to the system Open 
Monitor. If no, return iS made to 
Phase 2. 


Open Checkpoint/Restart Routine, Phase 
1: If a checkpoint records file is to 


be opened, this routine tests to 
determine if a restart is to be 
performed. If so, Phase 2 of the Open 
Checkpoint/Restart routine is called 
into the transient area. (This 
discussion assumes that a restart is 
not to be performed.) The routine 
checks the size of the checkpoint work 
area and formats the disk extents with 
dummy records. Return is made to the 
QTAM Open Monitor. 


Open Line Group/MS Queues Routine: A 
Set Address (SAD) command is prepared 


to set the telecommunications control 
unit (except for an IBM 2701) to the 
proper transmission speed for the 
terminal devices in the line group. 
If the line is a nonswitched line, an 
Enable command is prepared. If 
neither command is required, a No Op 
command iS prepared. An SVC 31 
(QPOST) is issued to post the LCB to 
itself. This causes the line to be 
scheduled for a receiving operation. 


*** ENTER RECEIVE SCHEDULER SUBTASK**¥* 


5. 


6. 


Receive Scheduler Routine: If there 
is an active entry in the polling list 
for the line, exit is made to the BRB 
Ring routine to continue 
initialization procedures for 
receiving. If the end of the polling 
list is detected, exit is made to the 
End of Poll Time Delay routine to 
observe a polling interval, if any. 


BRB Ring Routine: A ring of buffer 
request blocks (BRBsS) is built for 


Gynamic buffer allocation (BRBs are 
obtained from the Inactive BRB queue). 
The number of BRBS in the ring is 
equal to the value specified in the 
BUFNO operand. The address of the 
first BRB in the ring is stored in the 
LCB so the Activate routine can access 
it later, and the read-initial 
operation code is placed in the LOPC 
field of the LCB. The first BRB is 
then posted to the Active BRB queue 
with a high priority (X‘EC') to cause 
immediate servicing of the request for 
a buffer. 








aN 


*¥**ENTER ACTIVE BRB SUBTASK**# L3. 


Active BRB Routine: Recognition of 14, 
the high priority BRB causes an exit 

to the Buffer-BRB routine when a 

buffer is available (an available 

buffer is assumed for this 

description). 


Buffer-BRB Routine: An empty buffer 
is obtained from the Available Buffer 
queue, and it is assigned to the line 
by placing the address of the LCB in 
the buffer prefix. The buffer is then 
posted to the LPS queue with a 
priority of X*'EO*. 


***RETURN TO MESSAGE CONTROL PROGRAM*** 


9. 


10. 


Lis 


12. 


QTAM Open Routine (continued): If 


there are other lines in the line 
group, an SVC 31 (QPOST) is issued and 
Steps 3 through 6 are repeated for 
each line. Thus, when the line group 
has been completely opened, the 
following conditions exist: 


a. there is a BRB ring for each line 
in the group. 2. 


b. there is one empty buffer for each 
line in the group chained into the 
LPS queue. 


ENDREADY Macro Instruction: The 
user"s registers are saved in the user 
Save area. If the Checkpoint Records 
file has been opened, a QPOST (SVC 31) 
is issued to post the checkpoint 
element to itself. This action causes 
the interval timer to be set for the 
first checkpoint interval. (This 
discussion assumes that the checkpoint 34 
interval method of checkpointing is 
used.) 


***#ENTER CHECKPOINT SUBTASK*** 


Checkpoint Routine: The 
user-specified interval is obtained 


and is passed to the Time Delay 
routine. 


Time Delay Routine: A special element 
representing a request to set the 


timer for the specified interval is 
posted to the LPS queue. Control 
returns to the Message Control 
Program. 


***RETURN TO MESSAGE CONTROL PROGRAM*** 


ENDREADY Macro Instruction: Exit is 
made to the LPS Control routine. 


LPS Control Routine: A QWAIT (SVC 30) 
is issued to wait on the LPS queue. 
The timer request element posted to 
this queue in Step 12 is returned, and 
a SETIME macro instruction is issued 
to set the timer for the specified 
checkpoint interval. 


RECEIVING INITIATION 


LPS Control Routine: An SVC 30 is 
issued to QWAIT for the next item on 
the LPS queue. The QTAM nucleus 
removes an empty buffer from the LPS 
queue and returns it to the LPS 
Control routine. (The buffer 
previously was placed on the LPS queue 
by the Buffer-BRB routine.) The 
registers are initialized for the 
Activate routine, and the buffer is 
passed to that routine. 


Activate Routine: The address of the 
first BRB in the ring formed for this 
receiving operation is obtained from 
the LCB for the line. A CCW for 
reading data into the entire buffer is 
prepared in the first two words of 
this BRB (the third word contains the 
TIC address to the next BRB in the 
ring). Idle characters are inserted 
into the buffer per the value 
specified by the LPSTART macro 
instruction. The BRB is passed to the 
Channel Program Generator routine. 


Channel Program Generator Routine: 


The CCWs for terminal selection 
(polling) and reading the first 
segment are prepared (read-initial 
channel program). In preparing the 
channel program, the CCW for the 
buffer is transferred from the passed 
BRB to the channel program area, and 
the TIC command is moved from the BRB 
to the end of the CCWs in the channel 
program area. 


Note that the TIC address is 
invalid at this point because a buffer 
has not yet been assigned to the next 
BRB in the ring. The PCI flag is set 
in the read data CCW to cause a 
program-controlled interrupt (PCI) at 
the start of this first buffer. An 
EXCP (SVC 0) is then issued to start 
the I/O operation. After the I/O 
Operation has been started, exit is 
made to the LPS Control routine. 


Outline of QOTAM Operations 27 


4. LPS Control Routine: QWAIT for the 
next item on the LPS queue. If there 
are other lines in the system, steps 2 
through 4 are repeated until input 
operations have been started on each 
line. When an I/O operation has been 
Started for each line, the LPS Control 
routine finds no further buffers on Ds 
the LPS queue, and the message control 
program enters a wait state. At this 
point a message processing program in 
a lower priority partition is given 
control through the DOS task selection 
mechanism. Subsequent PCIs and I/O 
interruptions cause buffers to be 
posted to the LPS queue, thereby 
allowing the message control program 
to proceed. 


FIRST PCI (RECEIVING) 


It waS emphasized under OTAM Opens that 
initially only one buffer is assigned to a 
line for receiving. QTAM causes a PCI to 
occur at the start of the first buffer so 
that an empty buffer can be assigned to 


flag in the PIB for the foreground-1 
partition. This procedure is 
performed because the buffer(s) posted 
to the LPS queue satisfies the QWAIT 
SVC issued by the LPS Control routine 


in step 5 of Receiving Initiation. 


DOS Supervisor: Because the message 
control program is the 
highest-priority program ready to 
proceed, that program is selected for 
activation by the DOS Supervisor. 
Control is returned to the LPS Control 
routine at the instruction following 
the QWAIT. 


Note: The procedures described in 
steps 4 and 5 apply in most cases 
where a PCI or I/O interrupt is 
processed by QTAM routines. For the 
sake of brevity, any discussion of 
returns to the DOS Supervisor and the 
action taken by the Supervisor is 
omitted from the remainder of this 
description except when a deviation 
from these procedures occurs. 





each of the remaining BRBs (after the ***RETURN TO MESSAGE CONTROL PROGRAM*** 


first) in the ring formed for receiving the 
message. The DOS Supervisor passes control 6. 
to the QTAM Line Appendage which recognizes 

the PCI and enters the Line-PCI routine. 


1. Line-PCI Routine: The remaining BRBs Ve 
(after the first BRB) in the BRB ring 
are posted to the Active BRB queue 
with high priority (X‘EC'). 


***ENTER ACTIVE BRB SUBTASK*** 


2. Active BRB Routine: Recognition of 
the high-priority BRB causes an exit 
to the Buffer-BRB routine if a buffer 
is available (an available buffer is 
assumed for this description). 


3. Buffer-BRB Routine: Another empty 
buffer is assigned for receiving on 
the line and is posted to the LPS 8. 
queue with a priority of X'EO"'. 


Steps 2 and 3 are repeated for each 
BRB posted to the Active BRB queue by 
the Line-PCI routine. The buffers are 
obtained from the Available Buffer 
queue. 


4. Return to DOS Supervisor: Servicing 
of the PCI is now complete; therefore, 


LPS Control Routine: The empty buffer 
returned by the QWAIT is passed to the 
Activate routine. 


Activate Routine: A CCW (with the PCI 
flag set) is prepared for the entire 
buffer in the second (next) BRB in the 
ring. The BRB is then added to the 
channel program already in process for 
the line. This is accomplished by 
making the TIC address valid in the 
CCW at the end of the channel program 
previously built (see Step 3 of 
Receiving Initiation). Exit is then 
made to the LPS Control routine. In 
this example, the second BRB now 
contains a TIC to the third BRB in the 
ring, but the TIC address is invalid 
because a buffer has not yet been 
assigned to the third BRB. 


LPS Control Routine: OQWAIT for the 
next item on LPS queue. Steps 6 and 7 
are repeated until an empty buffer has 
been aSSigned to each BRB in the ring. 
The message control program then 
enters the wait state pending the 
arrival of another item on the LPS 
queue. | 


control is returned to the DOS PCI--FULL BUFFER (RECEIVING) 


Supervisor. Before returning to the 
Supervisor, however, the message 


control program is removed from the During line receiving operations, a PCI 
wait state by turning off the wait occurs at the start of each buffer. The 
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action required for the PCI at the start of 
the first buffer has already been 


described. 


The PCI for each buffer 


subsequent to the first indicates that the 
previous buffer has been filled with 
message data and can be processed by the 


user's LPS section. 


The handling of each 


such PCI is described here, 


a ee 


Si 
Line-~PCI Routine: In this example, 
the PCI at the start of the second 
buffer indicates that the first buffer 6. 
has been filled with incoming data. 
The first BRB in the ring (the BRB to 
which the first buffer was assigned) 
is posted to the Active-BRB queue with 
a low priority (X*E4'), and the 
message-filled buffer is posted to the 
Interim LPS queue. More generally, 
for all PCIs subsequent to the first: 


a. the preceding BRB is posted to the 
Active-BRB queue, and te 


b. the message filled buffer is 
posted to the Interim LPS queue. 


The former allows the same BRB 
ring to be reused for the case where 
the incoming message requires more 
buffers than specified in the BUFNO 
operand. The latter causes each 
message-filled puffer to eventually be 
routed to the user's LPS section. 


***ENTER ACTIVE BRB SUBTASK**¥* 


Active BRB Routine: The BRB posted by 
the Line-PCI routine in the previous 
step is chained into the element chain 
of the Active BRB queue. 


*** ENTER INTERIM LPS SUBTASK*** 


Interim LPS Routine: The 
message-filled buffer posted to the 
Interim LPS queue in step 1 is now 
posted to the LPS queue with low 
priority (X‘'EO"'). 


The Interim LPS subtask 
provides the means of delaying 9. 
the processing of all buffers 
until all BRBs are processed 
when a PCI is missed due to 
extended CPU disable time. 


Note: 


10. 


***RETURN TO MESSAGE CONTROL PROGRAM** * 


u 


LPS Control Routine: The Svc 30 
(QWAIT) issued by this routine in step 


8 of First PCI (Receiving) is 


satisfied by the appearance of the 
message-filled buffer on the LPS 
queue. The registers are initialized, 
and the buffer containing the header 
segment of the incoming message is 
passed to the receive group of the 
user's LPS. 


Executed for 


RCVSEG Subgroup of LPS: 


all segments. 


RCVHDR_ Subgroup of LPS: This portion 
of the LPS is executed only for the 


first buffer of the message (after the 
second PCI). The Lookup Terminal 
Table Entry routine (linked to by 
either the Route Message routine or 
the DIRECT macro expansion) sets the 
address of the QCB for the destination 
in the LODT field of the source line 
LCB. 


ENDRCV Subgroup of LPS: The ENDRCV 
macro expansion tests the BSTA field 


of the buffer prefix for EOB, EOT or 
duplicate header. If any of these are 
indicated, the functional macros 
within the ENDRCV subgroup are 
executed; otherwise, exit is made to 
the Cleanup routine. In this example, 
it is assumed that no EOB or EOT 
appears in the first buffer. (The 
duplicate header condition applies 
when multiple routing of the message 
is being performed via the EOA macro 
and is not considered in this 
discussion.) 


Cleanup Routine: An SVC 31 (QPOST) is 
issued to post the buffer containing 
the header to the DASD-destination 
queue with a priority of X'E4Y'. (The 
address of the QCB for the destination 
was saved in the LCB in step 6.) For 
the first buffer, this causes the Send 
Scheduler subtask to be activated. 

For subsequent buffers containing 
segments of this message, it causes 
the DASD-Destination subtask to be 
activated. 


***ENTER SEND SCHEDULER SUBTASK* *¥* 


Send Scheduler Routine: This routine 
detects a message-filled buffer to be 
written on the disk and exits to the 
DASD-Destination routine. 


DASD-Destination Routine: A disk 
location (relative record number) is 
assigned for this buffer. Disk 
locations are reserved and recorded 
for the next segment of this message 
(if any) and the header segment of the 
next message for this destination 
queue. The buffer is then posted to 
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the Disk I/O queue; meanwhile, the 
Send Scheduler waits for the 


destination line to become free. 


***ENTER DISK I/O SUBTASK*** 
11. Disk I/O Routine: 
number assigned to the buffer in the 
previous step is converted to an 
actual DASD address. A channel 
program is set up for writing the 


buffer (less the first eight bytes) on 


the disk, and a special control block 
is posted to the LPS queue to request 
that the I/O be started. 


**¥*RETURN TO MESSAGE CONTROL PROGRAM*** 
12. Cleanup Routine: The QPOST (Svc 31) 
issued by this routine in step 8 is 
completed. 
the LPS Control routine. 
13. LPS Control Routine: QWAITsS on the 
LPS queue. The request to start a 
Disk I/O operation posted to the LPS 
queue in step 11 is returned. This 
routine issues an EXCP (SVC 0) to 
start the I/O and QWAITs for the next 
item on the LPS queue. 
no item is on that queue so the 
message control program enters a wait 
state. 


Summary Of Operations to this Point 


Operations completed: 


e Filling of first buffer from line. 


e Processing of first buffer by receive 
group of user's LPS. 


Operations in process: 


e Filling of second buffer from line 


e Writing of first buffer on the disk 


Possible Interruptions 


At this point, any one of four possible 
interruptions may occur due to the 
operations in process. 
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The relative record 


This routine then exits to 


At this point, 


A PCI indicates that another buffer has 
been filled from the line. Steps 1 
through 13 of PCI--Full Buffer 
(Receiving) are repeated with the 
following differences: 


1. The buffer is not processed by the 
RCVHDR subgroup of the LPS. 


2. The DASD-Destination routine 
initializes the buffer for a text 
segment and reserves only one disk 
location (for the next text 
segment). 


Channel-End (CE), Device End (DE) from 
the disk indicates that writing of the 
first buffer on the disk is complete. 


CE, DE from the line indicates that an 
EOB was received from the terminal. 


CE, DE, and unit exception (UE) from 
the line indicates that an EOT was 
received from the terminal. 


This discussion assumes that the disk 
interruption occurs first followed by a 
line interruption for an EOB. 


DISK INTERRUPTION (RECEIVING) 


CE, 


DE from the disk indicates that the 


disk write operation has been completed. 
The DOS Supervisor passes control to the 
Disk-End Appendage. 


1% 


Disk-End Appendage: The message 
segment contained in the buffer has 


been recorded in the appropriate 
DASD-Destination (or process) queue; 
therefore, the buffer is now released. 
This is accomplished by posting the 
buffer to the Available Buffer queue. 


***ENTER AVAILABLE BUFFER SUBTASK*** 


Available Buffer Routine: The BRB 
placed on the element chain of the 
Active BRB queue by the Line-PCI 
routine (step 1 of PCI--Full Buffer 
(Receiving)) is found, removed, and 
passed to the Buffer-BRB routine. 


Buffer-BRB Routine: An empty buffer 
is removed from the Available Buffer 
queue and assigned for receiving on 
the line. The buffer is posted to the 
LPS queue with a priority of X"EO'. 


e aS 








***RETURN TO MESSAGE CONTROL PROGRAM*** 


4 


LINE 


LPS Control Routine: The appearance 
of an empty buffer on the LPS queue 
causes the QWAIT earlier issued by 
this routine to be satisfied. The 
buffer is passed to the Activate 
routine. 


Activate Routine: A CCW is prepared 
in the BRB for the entire buffer and 
is added to the channel program 
already in process. 


LPS Control Routine: QWAIT on the LPS 
queue. The message control program 
enters the wait state. 


END INTERRUPTION (RECEIVE EOB) 


CE, DE on a line I/O interruption indicates 
that an EOB was received from the terminal. 
Control passes to the Line-End routine in 
the Line Appendage. 


Line-End Routine: A check is made for 
errors in the transmission (data 
check, intervention required, or 
time-out). If any is detected, it is 
recorded in the error halfword of the 
LCB. The offset to the next available 
location (following the EOB) in the 
buffer is recorded in the BSSZ field 
of the buffer prefix, and the buffer 
is passed to the Interim LPS routine. 


Interim LPS Routine: The offset in 
the terminal table of the source 
terminal is obtained from the LCB and 
placed in the buffer prefix (BSTO 
field). The buffer containing the EOB 
is posted to the LPS queue with X’E0O' 
priority. 


***RETURN TO MESSAGE CONTROL PROGRAM*** 


3. 


LPS Control Routine: The buffer 
posted to the LPS queue in the 
preceding step is obtained and passed 
to the user's LPS section. 


RCVSEG Subgroup of LPS: Executed for 


all segments. 


RCVHDR Subgroup of LPS: This subgroup 
is bypassed because the current buffer 


is not the first buffer. 


ENDRCV_ Subgroup of LPS: Because the 
current buffer contains an EOB, this 


suogroup is executed up to and 
including the EOB (or EOBLC) macro 
expansion. 


10. 


EOB (or EOBLC) Routine: The Read 
Continue indicator is set in the LCB, 
and the buffer is passed to the 
Activate routine. 


Activate Routine: A CCW is prepared 
for the entire buffer in the BRB 
associated with the buffer. 


Channel Program Generator Routine: A 
Read Continue channel program is 


generated to respond to the EOB, and 
to read the next block of data into 
the portion of the buffer following 
the EOB. An EXCP is issued to start 
the I/O operation, and exit is made to 
the LPS Control routine. 


LPS Control Routine: OQWAIT for the 
next item on the LPS queue. No item 
is on the LPS queue, so the message 
control program enters the wait state. 


LINE END INTERRUPTION (RECEIVE EOT) 


CE, 


DE and UE from the line indicate that 


an EOT was received from the terminal. 
Control passes to the Line-End routine in 
the Line Appendage. 


1. 


Line-End Routine: Any errors detected 
are recorded in the error halfword of 
the LCB. The buffer is passed to the 
Interim LPS routine. 


Interim LPS Routine: The buffer 
containing the EOT (and the previous 
EOB) is posted to the LPS queue with a 
priority of X‘EO’. 


***RETURN TO MESSAGE CONTROL PROGRAM*** 


3. 


LPS Control Routine: The buffer 
posted to the LPS queue in the 
preceding step is obtained and passed 
to the user’s LPS section. 


RCVSEG Subgroup of LPS: Executed for 
that portion of the segment that 


follows a previous EOB. 


RCVHDR Subgroup of LPS: This subgroup 
is bypassed because this buffer is not 


the first buffer. (A previous EOB 
also causes this subgroup to be 
bypassed.) 


ENDRCV_ Subgroup of LPS: This entire 
subgroup is executed because an EOT 


has been received. 
POSTRCV Macro Instruction: The 


expansion of this macro is a branch to 
the Cleanup routine. 
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8. 


2. 


10. 


Cleanup Routine: An SVC 31 (QPOST) is 
issued to post the buffer to the 
DASD-Destination queue with a priority 
of X"E4'., 


***ENTER DASD-DESTINATION SUBTASK*** 


DASD-Destination Routine: The disk 
location previously reserved for the 
next segment in this message is 
assigned to this buffer. Because this 
buffer contains an EOT and is not the 
first segment of the message, disk 
locations are not assigned for the 
next segment or the header segment of 
the next message. The buffer is then 
posted to the Disk I/O queue. 


**4ENTER DISK I/O SUBTASK*** 


Disk I/O Routine: The relative record 
number assigned to the buffer is 
converted to an actual DASD address. 

A special control block requesting 
that the disk I/O operation be started 
is posted to the LPS queue. (As 
previously described, this control 
block is passed to the LPS Control 
routine which issues the EXCP to start 
the I/O.) 


***RETURN TO MESSAGE CONTROL PROGRAM*** 


11. 


12. 


Cleanup Routine (continued): The SVC 
31 issued in step 8 has been 
completed. Any buffers assigned for 
this operation but not used are posted 
to the Available Buffer queue with 
X'E4" priority. The following step is 
repeated for each such buffer posted. 


***ENTER AVAILABLE BUFFER SUBTASK*** 


Available Buffer Routine: The buffer 
being released is linked into the 
element chain of the Available Buffer 
queue. 


***RETURN TO MESSAGE CONTROL PROGRAM*** 


13. 


32 


Cleanup Routine (continued): At this 
point, the Distribution List, EOA, and 


Conversational Mode routines would be 
executed if any of the functions 
performed by these routines are 
specified for this message (this 
example assumes none were specified). 
Exit is made to the Free BRB routine. 
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14. 


Free BRB Routine: Each BRB in the 
ring constructed for the receiving 
operation just completed is posted to 
the Inactive BRB queue. 


Exception: If a BRB is in the Active 
BRB queue, it is not posted. A flag 


is set in this BRB so that when a 
buffer is available, it will not be 
assigned to the BRB and the BRB is 
then posted to the Inactive BRB queue. 


The LCB for the line is then posted 


(SVC 31) to itself to free the line 
for its next use. 


SUMMARY OF RECEIVING 


Operations Completed 


Received complete message including 
EOT. 


Message written on DASD-destination 
queue. 


Indicated to the destination line that 
a message is queued for transmission 
(this was accomplished by chaining the 
STCB for the Send Scheduler into the 
LCB for the destination line). 


Released buffers and BRBs associated 
with source line. 


Freed the source line to poll or send. 


Next Use of Source Line 


The next use of the nonswitched line over 
which the message was received depends on 
the relative priority of receiving versus 
sending as specified in the CPRI operand 
for the line group. 


Receiving has priority over sending 
(CPRI=R). Messages are sent on the 
line only while a polling interval is 
being observed. In this example, if 
CPRI=R were specified, the Receive 
Scheduler would now be dispatched to 
initialize for repolling the same 
terminal. 


Receiving and sending have equal 
priority (CPRI=E). Messages are sent 
on the line at the end of a polling 
pass of the terminals on the line, 
regardless of any specified polling 
interval. In this example, polling 
would continue until the end of the 
polling list is detected. 


_ 








e Sending has priority over receiving 
(CPRI=S). The Send Scheduler gains 
controls for sending on the line each 
time an EOT is received, the end of the 
polling list is detected, or a negative 
response to polling is received. 


Because this discussion assumes a 
one-line system, the message just received 
is to be sent to a terminal on the same 
line. Also, for the purpose of this 
example, it is assumed that sending has 
priority over receiving. For either 
receiving or equal priority, the procedures 
already described would be repeated at this 
time. If the message just received was 
destined for a terminal on another line, 
the time at which it would be sent would 
depend on the status of the system and the 
priority assigned to that line. But at 
some point in time, the destination line 
would become free, and the Send Scheduler 
would gain control of the line. 


SENDING INITIATION 


Continuing with the example, because 
sending priority is assumed for the line, 
the line's Send Scheduler is activated for 
sending the message just received. 


*** ENTER SEND SCHEDULER SUBTASK*** 


1. Send Scheduler Routine: This routine 
exits to the BRB Ring routine when the 
line is free for sending and a 
complete message is on the 
DASD-destination queue for the line. 


2. BRB Ring Routine: A ring of BRBs to 
be used for dynamic buffer allocation 


is built. (BRBs are obtained from the 
Inactive BRB queue.) The address of 
the first BRB in the ring is stored in 
the LCB for later access by the 
Activate routine. Because this is a 
sending operation, the disk relative 
record number of the first segment in 
the message is placed in the first 
BRB, and the BRB is assigned (RSTA=9) 
for a disk read. The first BRB is 
then posted to the Disk I/O queue with 
a priority of X'EO'. 


***RETURN TO MESSAGE CONTROL PROGRAM*** 


At this point, the QPOST of the LCB 
issued by the Free BRB routine (step 
14 of Line End Interruption (Receive 
EOT)) is completed and control 
returned to that routine which exits 





immediately to the LPS Control 
routine. 

LPS Control Routine: QWAIT for item 
on the LPS queue. 


***ENTER DISK I/O SUBTASK*** 


Disk I/O Routine: A buffer from the 
Available Buffer queue iS assigned for 
the disk read operation. (If no 
buffer is available, the BRB is posted 
to the Active BRB queue to wait for an 
available buffer.) The relative 
record number of the first segment is 
converted to an actual disk address, 
and a request to start the disk read 
operation is posted to the LPS queue. 


***RETURN TO MESSAGE CONTROL PROGRAM** * 


oe 


LPS Control Routine: Issues an EXCP 
to start the disk read operation, and 
then QWAITS for an item on the LPS 
queue. The message control program 
enters a wait state pending completion 
of the disk read. 


DISK INTERRUPTION--SENDING, FIRST BUFFER 


CE, DE from the disk indicates that reading 


of the first buffer is complete. 


The DOS 


Interrupt Handler passes control to the 
Disk End Appendage. 


1. 


Disk End Appendage: A sequence-out 
number is assigned to the message and 


recorded in the header prefix. The 
message-sent (or serviced) flag is set 
in the prefix (bit 3 of BSTA) anda 
new start I/O is requested to rewrite 
the same buffer on the disk. 
(Rewriting the same buffer on the disk 
with the message-sent flag turned on 
indicates to QTAM that the message has 
been handled even though it has not 
actually been transmitted yet.) 
Control returns to the DOS Supervisor 
which starts the I/O to rewrite the 
buffer and then returns to the 
interrupted program. 


DISK INTERRUPTION--SENDING ALL BUFFERS, 
SECOND TIME FOR FIRST BUFFER 


1. 


Disk End Appendage: The buffer filled 
by the disk read operation is posted 
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to the LPS queue. If this is the 
second interrupt for the first buffer, 
the message-sent flag is turned off in 
the buffer prefix prior to posting the 
buffer to the LPS queue. The disk 
relative record number of the next 
segment is placed into the next BRB in 
the ring, and the BRB is posted to the 
Disk I/O queue. 


***ENTER DISK I/O SUBTASK*** 


2. Disk I/O Routine: A buffer from the 
Available Buffer queue is assigned for 
reading the next segment of the 
message from the disk. The relative 
record number of the next segment is 
converted to an actual DASD address. 

A request to start the disk-read 
operation is posted to the LPS queue 
witn a high priority, so it will be 
processed before the message-filled 
buffer placed on the LPS queue in step 
2 ie 


***RETURN TO MESSAGE CONTROL PROGRAM*** 


3. LPS Control Routine: This routine 
issues an EXCP to begin reading the 
next segment from the disk queue. A 
QWAIT is then issued to obtain the 
message-filled buffer from the LPS 
queue. This buffer is passed to the 
user's LPS section. 


G4. SENDHDR Subgroup of LPS: Executed for 
the first segment only. 


oe SENDSEG Subgroup of LPS: Executed for 


all segments. 


6. ENDSEND Macro Instruction: The 
expansion of this macro generates a 
branch to the Activate routine and an 
entry point to the End Send subgroup. 
At this point, the branch to the 
Activate routine is taken. 


7. Activate Routine: The message-sent 
flag is set in the buffer prefix of 
all buffers. For the first buffer, 
the address of the first BRB in the 
Ying is obtained from the LCB for the 
destination line. A CCW is prepared 
in the BRB for writing the entire 
buffer. The BRB also contains an 
invalid (two low order bits are 
nonzero) TIC address to the next BRB. 
The BRB is passed to the Channel 
Program Generator routine with an 
indication that a Write Initial 
channel program is to be generated. 
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For all buffers except the first 
buffer, a CCW is prepared in the BRB | 
for the entire buffer. This BRB is ©. 
added to the channel program already 
in process by making the TIC address 
in the previous BRB valid (two 
low-order bits are cleared to zero). 

The PCI flag is set in the CCW, and 
exit is made to the LPS Control 
routine. Step 8 is executed only for 
the first buffer of the message. 


fo 


8. Channel Program Generator Routine: A 


write-initial channel program is 
generated in the channel program area 
for the destination line. It consists 
of the CCWs for terminal selection 
(addressing) and writing the first 
segment. In preparing the channel 
program, the CCWs for writing the 
segment and the TIC to the next BRB 
are transferred from the passed BRB to 
the end of the channel program area. 
An EXCP is issued to start the I/O 
operation, and exit is made to the LPS 
Control routine. 


9. LPS Control Routine: A QWAIT is 
issued for the next item on the LPS 
queue. The message control program 
enters the wait state. 

To avoid repetition in this 
discussion, the following operations 
are assumed to be completed or in 
progress at this point: 


Operations completed: 


1. Writing of first segment of message on 
the line. 


2. Reading of second segment from the 
disk. 


3. Processing of the second segment by 
the Send group of the LPS. 


Operation in progress: 
Writing of second segment on the line. 


PCI--SENDING 


A PCI occurs during sending Operations at 
the start of every buffer except the first. 
The PCI flag was set in the CCW prepared in 
step 7 of the preceding section. 


1. Line-PCI Routine: The preceding BRB 
is posted to the Active BRB queue 
(priority X'E4') to request a buffer 
for the next disk read. The preceding 
buffer is posted to the Available a 
Buffer queue because the data in the 
buffer has been sent over the line. 
This procedure allows the BRB ring to 


( 





Active BRB Routine: 


be reused as many times as necessary 
to send the entire message. 


**¥*ENTER ACTIVE BRB SUBTASK*¥** 


The BRB posted to 
the Active BRB queue in the preceding 
step is linked into the element chain 
of that queue. 


***ENTER AVAILABLE BUFFER SUBTASK*** 


LINE 


made to the DOS Supervisor which 
issues SIO to read the response. 


END INTERRUPTION (RESPONSE TO EOB) 


Line-End Routine: Error checking is 
performed for the block just sent. 
Any error detected is recorded in the 
error halfword for the line. The 





3. Available Buffer Routine: FPosting of buffer containing the EOB is posted to 
a buffer to the Available Buffer queue the LPS queue with X"EO* priority. 
in step 1 causes this routine to be This causes the buffer to be routed 
entered. The BRB chained into the through the Send LPS again for further 
Active BRB queue in step 2 is removed error checking of the block that was 
from the element chain and passed to sent over the line. 
the Buffer-BRB routine. 

4. Buffer-BRB Routine: Because the BRB 
is a buffer request for a disk read, a ***RETURN TO MESSAGE CONTROL PROGRAM** * 
buffer (from the Available Buffer 
queue) is reserved for the disk read, 2. LPS Control Routine: The buffer 
and the BRB is posted to the Disk I/0 posted to the LPS queue in the 
queue. preceding step is routed to the user's 

LPS section. 

x Note: Just before sending the segment 
a ***ENTER DISK I/O SUBTASK*** over the line, the message-sent flag 
4 was turned on in the buffer prefix 

= 5. Disk I/O Routine: The relative record (bit 3 of BSTA). When the segment is 

number of the next segment to be read routed to the Send LPS for the second 
from the disk is converted to an time, the functions in the ENDSEND 
actual DASD address. A request to Subgroup are performed. The SENDHDR 
Start the disk read operation is and SENDSEG subgroups are bypassed 
posted to the LPS queue. because the segment was processed by 
these subgroups before it was sent 
Over the line. 
***RETURN TO MESSAGE CONTROL PROGRAM*** 3. ENDSEND Subgroup of LPS: For each EOB 
detected in an outgoing message, this 
6. LPS Control Routine: An EXCP is subgroup is executed up to and 
issued to start the disk read including the EOB (or EOBLC) routine. 
operation. (The interruption that 
occurs when this disk operation is 4. EOB (or EOBLC) Routine: The 
completed was described previously.) write-continue code is set in the LCB, 
The routine then QWAITs for the next and the buffer containing the FOB is 
item on the LPS queue. passed to the Activate routine. 
5. Activate Routine: A CCW is prepared 


for the entire buffer in the BRB 





LINE END INTERRUPTION (SEND EOB) associated with the buffer. 


6. Channel Program Generator 
Routine: The CCW prepared in the 


preceding step is modified to write 
that portion of the buffer that 
follows the EOB character. An EXCP is 
issued to start the I/O, and exit is 
made to the LPS Control routine. 


This example assumes that the second 
segment of the message contains an EOB. 
When this EOB is sent over the line, an 
interruption occurs, and control is passed 
to the Line Appendage. 


1. Line-End Routine: This routine sets 
up a restart address to read the Ts 
response to the EOB. An exit is then 





LPS Control Routine: QWAIT for the 
next item on the LPS queue. 
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LINE END INTERRUPTION (SEND EOT) 


1. Line End Routine: The buffer 
containing the EOT is posted to the 
LPS queue with X"EO*' priority. 


***#RETURN TO MESSAGE CONTROL PROGRAM*** 


2. LPS Control Routine: The buffer 
posted to the LPS queue in the 
preceding step is routed to the Send 
group of the user's LPS. (Because the 
message-sent flag is on, the buffer is 
routed directly to the ENDSEND 
subgroup. ) 


3. ENDSEND Subgroup of LPS: The entire 
subgroup is executed because a 


complete message has been sent. 


4. POSTSEND Macro Instruction: The 
expansion of this macro generates a 
branch to the Cleanup routine. 


5. Cleanup Routine: QPOST is issued to 
release the buffer to the Available 
Buffer queue. 


6. Free BRB Routine: Each BRB in the 
ring formed for sending the message is 
posted to the Inactive BRB queue. 


Exception: If a BRB is in the Active 
BRB queue, it is not immediately 
released. A flag is set in the BRB so 
that when a buffer is available, it 
will not be assigned to the BRB. The 
BRB is then posted to the Inactive BRB 
queue. 


The LCB for the line is posted to 
itself to free the line for its next 
use. 


Note: Once sending commences on a 
line, the line's Send Scheduler 
continually gains control until all 
messages on the destination queue for 
the line have been sent. The 
procedures beginning at Sending 
Initiation are repeated for each 
complete message on the destination 
queue. 


*** ENTER SEND SCHEDULER SUBTASK**¥* 


7. Send Scheduler Routine: A test is 
made to determine if another complete 
message is on the DASD destination 
queue. In this example, no other 
message is on the queve at this point. 
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Therefore, the Send Scheduler removes 
itself from the line’s STCB chain and 
waits for other messages to arrive on 
the destination queue. 


*¥**ENTER RECEIVE SCHEDULER SUBTASK*** 


The cycle of receiving a message and 
then sending it over the same line is 
now complete. Because this discussion 
assumes queueing by line, the Receive 
Scheduler subtask gains control to 
resume polling the terminals on the 
line. If queuing were by terminal, 
another Send Scheduler subtask would 
be contending with the Receive 
Scheduler for control of the line. 


MESSAGE CONTROL PROGRAM FOR AN AUDIO 
APPLICATION 


The message control program is loaded and 
entered as described in the section Message 


Control Program (for a Nonaudio 
Application). 


*** ENTER MESSAGE CONTROL PROGRAM* ** 


INITIALIZATION 


1. QTAM Open 7772 DCV Vocabulary File 
Routine: The address of the QTAM 


Vector Table is placed, if necessary, 
in the DOS Communication Region so 
that QTAM routines requiring 
information from the vector table can 
have access to it. The initialization 
of the 7772 DCV buffers (BABs) is 
completed and all the user-specified 
DCV words are loaded into main 
storage. The extent data for this 
OTAM file is read, and the File 
Protect Subroutine is called into the 
transient area. A parameter is passed 
directing it to call into the 
transient area the open module that 
must be executed next. 


2. QTAM Open Audio Line Group/Output 
Queue File Routine: The 


initialization of all ALCBs is 
completed and enabling is initiated on 
each line according to initial 
conditions. 


a 


=a 








END-OF-RECEIVING INITIATION 


1. ENDREADY Macro Instruction: 


The 


user's registers are saved in the user 


Save area. 


LPS 


2. LPS 


is issued to wait for the next ALCB on 


the 


A branch is made to the 
Control routine 
Control Routine: A QWAIT (SVC 30) 


LPS queue. The LPS Control 


routine finds no ALCB on the LPS 2% 
queue, and the message control program 


enters a wait state. 


At this point, 


control is given to a message 
processing program in a lower priority 
partition through the DOS task Dia 


selection mechanism. 


Subsequent I/0 


interruptions cause ALCBs to be posted 


to the LPS queue. 


This allows the 


message control program to proceed. 


Possible interruptions: 


At this 


point, any of the following line 
interruptions may occur as a result of 
audio input operations: 


AUDIO LINE END INTERRUPTION 


Channel-end (CE) and Device-end ue 
(DE) on an enable operation 

indicate that a 7772 invitational 
message may be sent. 


Channel-end and Device-end on a 

read operation indicate that an 

input message has been received in 

an ALCB. However, if the input 

length is null or if only one EOT Ds 
character has been received, the 

line is disabled and reinitiated 
according to initial conditions. 


Channel-end, Device-end, and Unit 
Exception (UE) indicate that the 
caller hung up during a read 
operation. In this case, the line 
is disabled and reinitiated 
according to initial conditions. 


(RECEIVING) 


Channel-end and Device-end on an audio line 
I/O interruption indicate that an input 6. 
message was received from a remote 


terminal. Control passes to the Audio 
Line-End routine in the Audio Line 
Appendage. 


1. Audio Line-End Routine: 


A check is 


made for errors in the transmission 
(data check, or input message 


overlength). 
is recorded in the error byte of the 
ALCS. 
is computed and saved in the ALCB. 


If any is detected, it 


The length of the input message 


But if this length is null or if the 
received message consists of one EOT 
character only, the line is disabled 
and reinitiated according to initial 
conditions. At this point, the ALCB 
is posted to the LPS queue. 


***RETURN TO MESSAGE CONTROL PROGRAM** * 


LPS Control Routine: The ALCB posted 
to the LPS queue in the preceding step 
is obtained and passed to the user's 
ARU/LPS section. 


User's ARU/LPS: The user can make a 
check for input message overlength, 
invalid repetition request as first 
message in a transaction, or data 
check during a read operation. As 
soon aS an error is detected, the ALCB 
is passed to the ARU Internal routine. 
If no error is detected, the ALCB is 
passed to the ARU Receive routine 
(step 4 is bypassed). 


ARU Internal Routine: The user's 
error message, in the form of an 
address chain, is placed in the 
address-chain buffer located in the 
ALCB. The length of the address chain 
is stored in the ALCB. The ALCB is 
posted to the ARU Send queue, and exit 
is made to the LPS Control routine. 


ARU Receive Routine: The passed ALCB 
is given a priority code of X'FCc'. To 
post this ALCB to the message 
processing program in which it must be 
processed, the corresponding 
MS~process queue iS Searched. If 
found, the ALCB is posted to it, and 
control is given to the LPS Control 
routine. If not Found (the message 
processing program has not been 
opened), the ALCB is queued ina 
waiting chain located in the 
corresponding PROCESS macro expansion, 
and control is given to the LPS 
Control routine. This waiting chain 
is directly transferred into the 
MS-process queue as soon as the 
message processing program is opened. 


LPS Control Routine: Waits for the 
next item on the LPS queue. If none, 
the message control program enters the 
wait state. 


SUMMARY OF RECEIVING 


An input message has been received in the 
ALCB that must be processed by the message 
processing program, 
waiting for an audio answer on the 


and the caller is 
line. 
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SENDING INITIATION 


Assume the message processing program 


provided a 7772 output message expressed in 


the form of an address chain. The audio 
PUT routine places this address chain in 
the address chain buffer of the ALCB, gives 
the ALCB a priority code of X'FD‘', and 
posts the ALCB to the ARU Send queue to 
activate the ARU Send scheduler. 


***#ENTER ARU SEND SUBTASK*** 


ARU Send Routine: Checks the type of 
unit related to the passed ALCB. 
Assuming it is a 7772 ALCB, the 
initial conditions for a 7772 write 
operation are set, and a test is made 
to determine whether or not a DCV 
buffer pool has been declared. If 
not, all DCV words to be used are 
already in main storage (word table), 
and control is directly passed to the 
7772 Disk Read routine. If yes, an 
available DCV buffer is extracted from 
the element chain of the DCV buffer 
queue and attached to the requesting 
ALCB. Then, control is given to the 
7772 Disk Read routine. 


Note: When the element chain of the 
DcV buffer queue contains no available 
DCV buffer, the ALCB is queued ina 
temporary waiting chain located in the 
DCV buffer queue. In this queue, the 
STCB field is updated with the address 
of the 7772 DCV buffer STCB, and 
control returns to the Qdispatch 
routine. At this point, a DCV buffer 
is expected to become free by another 
line. When this occurs, the available 
DCV buffer is posted to the DCV buffer 
queue, and the DCV buffer subtask is 
activated. 





***ENTER 7772 DCV BUFFER SUBTASK*** 
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7772 DCV Buffer Routine: Dequeues the 
ALCB from the waiting chain and 
associates it with the passed DCV 
buffer. When the last ALCB in the 
waiting chain has been thus dequeued, 
the address of the STCB field of the 
DCV buffer queue is updated with the 
address of the Queue Insert STCB. No 
update is performed if one or more 
ALCBS remain in the waiting chain. In 
either case, control is given to the 
7772 Disk Read routine. 
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3. 7772 Disk Read Routine: Analyzes the 
next address in the address chain 
buffer of the ALCB. 


. 


e If this address is that of a DCV 
word in main storage, it is 
computed and stored into the ALCB. 
The 7772 Disk Read routine then 
makes a test for a user's pause 
following a DCV word address. If 
this pause is present, it is 
stored into the ALCB. In either 
case, control passes to the 7772 
Line Write routine. 


e If this address is that of a DCV 
word in the DCV vocabulary disk 
file, a part of the DCV buffer 
allocated to the ALCB is assigned 
to the DCV word to be read. The 
disk address is computed, and the 
disk channel program is updated in 
the DCV buffer header. The 7772 
Disk Read routine then makes a 
test for a user's pause following 
a DCV word address. If this pause 
is present, it is stored into the 
ALCB. In either case, the DCV 
buffer is posted to the LPS queue. 


4G. LPS Control Routine: On recognition 
of a DCV buffer, this routine issues 
an EXCP to start a disk read 
operation, and then waits for an item is 
on the LPS queue. The message control | 
program enters the wait state until 
the next interruption. 


IBM 7772 DISK INTERRUPTION 


Channel-end and Device-end from the 
vocabulary disk indicate that reading of 
the DCV word is completed. The DOS 
Interrupt Handler passes control to the 
7772 Disk End Appendage. 


1. Disk End Appendage: The address and 
length of the DCV word being read are 


stored into the ALCB associated with 
the DCV buffer, and control passes to 
the 7772 Line Write Routine. 


IBM 7772 AUDIO SENDING 


1. 7772 Line Write Routine: Updates the 
channel program in the ALCB for a 
write operation. The PCI flag is set 
in the Write CCW used for the current 
DCV word, except when this DCV word 
corresponds to the last address in the ea 
address chain. If a user's pause has \ 
been stored into the ALCB, a write 


— 


CCWfor pause is updated in the channel chained to the Disable CCW. An 





program. In any case, the channel interruption occurs, and control passes to 
program keeps looping on a Write CCW the Audio Line Appendage. 
for elementary pause until the next 
DCV word is ready to be sent from the 1. Audio Line Appendage: On recognition 
DCV buffer. Then, the following of a Channel<end or Device-end ona 
operations are executed, depending on 7772 Disable operation, the channel 
whether the DCV word to be sent is the program in the ALCB is updated on the 
first word, an intermediate word, or Enable CCW according to initial 
the last word. conditions. The exit from the Exit 
interface routine is changed to a 
e For the first DCV word, the ALCB return to the Audio Line Appendage 
is posted to the LPS queue. after the DCV buffer has become free. 
The DCV buffer is posted to the DCV 
e For the intermediate DCV words, buffer queue, and control is given to 
the waiting loop created in the the Qdispatch routine. If no ALCB is 
channel program for the preceding waiting for a DCV buffer, the Queue 
DCV word is broken, and the next Insert subtask is activated. 


DCV word to be sent (except the 
last) is chained to the Write CCW. 


At this point, the section PCI **#* ENTER QUEUE INSERT SUBTASK*** 
Sending is entered. 

2. Queue Insert Routine: The DCV buffer 

e For the last DCV word, there is no is placed last-in-first-out in the 

PCI flag for the corresponding element chain of the DCV buffer queue, 
Write CCW nor waiting loop in the the normal exit from the Exit 
channel program. But, the last Interface routine is bypassed, and the 
Write CCW is chained to a Read or special return to the Audio Line 
Disable CCW, depending on the mode Appendage is taken. 
of transaction. At this point, 
the section Audio Line End 3. Audio Line Appendage: The normal exit 
Interruption is entered. from the Exit Interface routine is 


reestablished, and the ALCB is posted 
to the LPS queue. 





***RETURN TO MESSAGE CONTROL PROGRAM*** 


Da LPS Control Routine: Issues an EXCP ***RETURN TO MESSAGE CONTROL PROGRAM**¥* 
to start a write line operation, and : 
Waits for the next element on the LPS 4G. LPS Control Routine: Issues an EXCP 
queue. to start an enable operation on line, 


and waits for the next element on the 
LPS queue. 


PCI SENDING At this point, the 7772 cycle of 
receiving a message and sending an audio 
answer on the same line is complete. 

A PCI occurs during the sending operation 


Of each DCV word except the last. The DOS Note: The sending part of a 
Interrupt Handler passes control to the corresponding 7770 cycle is very 
Audio Line Appendage. Simple and short, as shown below: 

1. Audio Line Appendage: On recognition e The ARU Send routine updates the 
of a PCI on a 7772 write operation, channel program, and posts the 
the ALCB is passed to the Disk Read ALCB to the LPS Control routine. 
routine, and the previous steps (from 
step 3 in section Sending Initiation) e The LPS Control routine issues an 
are repeated until complete emission EXCP to start the complete write 
of the last DCV word. operation. 


e Channel-end and Device-end passed 
to the Audio Line Appendage 





AUDIO LINE END INTERRUPTION indicate the completion of the 
transaction. 

Assuming a 7772 audio line is working in e The channel program is updated on 

inquiry mode, the Write CCW (in the channel the Enable CCW according to 

program) for the last DCV word has been initial conditions. 
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e The ALCB is posted to the LPS 
queue which issues an EXCP to 
start the enable operation. 


At this point, too, the 7770 cycle is 
complete. 


MESSAGE PROCESSING PROGRAM FOR A NONAUDTO 
APPLICATION 


After the message processing program phase 
has been loaded from the core image library 
into either the foreground-2 or background 
partition, it is entered for execution by 
the DOS Supervisor at some point when the 
message control program (in foreground one) 
enters the wait state. This discussion 
assumes that the message processing program 
is executing in foreground-2. 


*** ENTER MESSAGE PROCESSING PROGRAM*** 


INITIALIZATION 


1. QTAM Open Routine, Main Storage (MS) 
Process and Destination Queues: When 


an MS-process queue is being opened, 
the address of the QCB for the 
corresponding DASD-process queue 
(generated by the expansion of a 
PROCESS macro in the message control 
program) is placed into the DTF table. 
The address of the LCB for the 
MS-process queue is placed into the 
QSTL field of the QCB for the 
DASD-process queue. This action opens 
the "door" between the message control 
and message processing programs and 
allows messages to be transferred to a 
processing program in response to a 
GET. 


To open a MS-desStination queue, the 
open bit is turned on in the DTF 
table. 


FIRST GET 


The transfer of message-filled buffers to 
the MS-process queue commences when the 
first GET macro instruction is issued in 
the message processing program. Prior to 
the first GET, any incoming messages having 
this processing program as a destination 
are accumulated on the corresponding 
DASD-process queue. 
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Note: The procedures for handling an 
incoming message destined for a processing 
program pricr to the first GET are 
basically the same as those described in 
the section Message Controi Program, except 
that the message is written ona 
DASD-process queue rather than on a 
DASD-destination queue. 


This discussion assumes that the work 
unit requested by a GET is a complete 
message (WU=M) terminated by an EOT 
character, and that the user-defined work 
area is large enough to contain an entire 
message. It is also assumed that the 
Expedite option was not specified in the 
PROCESS macro. 


1. Get Message Routine: This routine 
normally releases the previous buffer 


to the Return Buffer queue through a 
QOPOST (SVC 31). The previous buffer 
is that buffer in the MS-process queue 
from which data was transferred to the 
user work area on the previous GET. 
Because this is the first GET, there 
is no previous buffer; therefore, a 
dummy buffer (contained in the DTF 
table for the MS-process queue) is 
posted to the Return Buffer queue. 


***ENTER RETURN BUFFER SUBTASK*** 


2. Return Buffer Routine: The QCB for 
the MS-process queue is contained in 
the DTF table for that queue and 
serves a dual purpose because it is 
also used aS a BRB. The BRB is 
initialized for requesting a buffer 
into which a segment can be read from 
the DASD-process queue. Because the 
dummy buffer is being returned, exit 
is made to the Get Scheduler routine. 
Subsequent to the first GET, the 
previous buffer being returned from 
the MS-process queue iS posted to the 
Available Buffer queue before exiting 
to the Get Scheduler. 


3. Get Scheduler Routine: A test is made 
to determine if there is a message on 
the DASD-process queue (a message is 
assumed in this description). The 
disk relative record number of the 
header segment of the message is 
obtained from the QCB for the 
DASD-process queue and placed into the 
BRB. The BRB is then posted to the 
disk I/O queue. 


**#*ENTER DISK I/O SUBTASK*** 


4“. Disk I/O Routine: A buffer from the 
Available Buffer queue is assigned 


—_ 
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forthe disk-read operation. (If no 
buffer is available, the BRB is posted 
to the Active BRB queue to wait for a 
buffer to become available.) The 
relative record number of the segment 
is converted to an actual DASD 
address, and a request to start the 
disk operation is posted to the LPS 
queue. 


***RETURN TO MESSAGE CONTROL PROGRAM** * 


5s 


LPS Control Routine: The message 
control program has been in the wait 
state because a message processing 
program gains control only when the 
message control program iS waiting for 
an item to appear on the LPS queue. 
The start I/O request posted in the 
preceding step causes this wait to be 
satisfied, and the LPS Control routine 
issues an EXCP to start the disk read 
operation. It then QWAITs for the 
next item on the LPS queue, and the 
message control program enters the 
wait state again. | 


***RETURN TO MESSAGE PROCESSING PROGRAM* ** 


6. 


Get Message Routine (continued): The 
QPOST issued by this routine in step 1 


has been completed. A QWAIT (Svc 30) 
is issued to wait for a buffer in the 
MS-process queue. At this point, the 
message processing program also enters 
the wait state pending completion of 
reading the header segment from the 
disk. Because both the message 
control and message processing 
programs are in the wait state, the 
DOS Supervisor gives control toa 
non-QTAM program in the background 
partition. 


Disk Interrupt, Header Segment 


CE, DE from the disk indicates that reading 
of the header segment into the buffer is 


complete. 


Control passes to the Disk End 


Appendage via the DOS Supervisor. 


7. 


Disk End Appendage: A sequence-out 
number is assigned to the message and 


recorded in the header prefix. The 
message-sent flag is set in the prefix 
to indicate to QTAM that the message 
has been serviced. Return is then 
made to the Supervisor with a request 
to rewrite the header segment on the 
disk. The Supervisor starts the I/O 
and returns to the interrupted 
program. 


Disk Interrupt, Rewrite of Header Segment 


The disk-end appendage is entered when a 
disk interruption indicates that rewriting 
of the header segment has been completed. 


8. 


Disk End Appendage: The BRB and the 
buffer containing the header segment 


are removed from the Disk I/O queue. 
The message-sent flag is turned off in 
the header prefix, and the buffer 
containing the header segment is 
chained into the MS-process queue, 


A test is then made to determire if 
the MS-process is full. The number of 
buffers allocated to the MS-process 
queue is specified by the BUFNO 
operand of the DTFQT macro used to 
define the MS-process queue. BUFNO=4 
is assumed in this discussion; 
therefore, the MS-process queue is not 
full at this point. 


The relative record number of the 
next segment in the message (last 
segment in this example) is placed 
into the same BRB, and the BRB is 
posted to the Disk I/O queue again. 


At this point, Steps 4 and 5 are 
repeated to start reading the next 
segment into a buffer. 


***RETURN TO MESSAGE PROCESSING PROGRAM*** 


9. 


Get Message routine (continued): The 
message-filled buffer placed on the 


MS-process queue in step 8 causes the 
OQWAIT issued by this routine in step 6 
to be satisfied. Control returns to 
the instruction after the QWAIT with 
the address of the buffer containing 
the header segment in register 1. 


Note: Completion of the disk read of 
the second segment would cause the 
message processing task to be 
interrupted; however, discussion of 
this interrupt is deferred for the 
moment. 





The Get Message routine transfers 
the header segment from the buffer to 
the user"s work area and moves the 
name of the source terminal into the 
TRMAD field. A test is then made for 
end-of-message. This discussion 
assumes that two buffers are required 
to contain the complete message; 
therefore, a QWAIT is issued to obtain 
another buffer from the MS-process 
queue. 
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Prior to the QWAIT, a QPOST is. 
issued to return the previous buffer 
(buffer just processed) to the Return 
Buffer Queue. This QPOST causes steps 
2 through 5 to be repeated to start 
reading the header segment of the next 
message from the disk when the current 
disk operation is completed. 


Disk Interrupt, Text Segments 


CE, DE from the disk indicates that reading 
of the text segment has been completed. 


10. Disk End Appendage: The buffer 
containing the text segment is chained 


into the MS-process queue. This 
discussion assumes that this text 
segment ends the message. Because the 
MS-process queue is still not full, 
the BRB is initialized with the 
relative record number of the next 
segment and is posted to the disk I/O 
queue. This causes reading of the 
next segment from the disk queue to 
commence as previously described. 


***RETURN TO MESSAGE PROCESSING PROGRAM*** 


11. Get Message Routine (continued): The 
appearance of the buffer containing 


the last segment of this message on 
the MS-process queue causes the QWAIT 
issued in step 9 to be satisfied. The 
data in the buffer (up to and 
including the EOT) is transferred to 
the work area starting at the position 
after the end of the header segment. 
Because a complete message has now 
been placed in the work area, the 
length of the message and the 
end-of-message code are set in the 
GET/PUT prefix. Control then returns 
to the instruction after the GET for 
processing of the message according to 
the application. 


REPLENISHING THE MS-PROCESS QUEUE 


After the first GET has been issued, QTAM 
automatically replenishes the MS-process 
queue with incoming messages having the 
MS-process queue as their destination. As 
long as messages are arriving faster than 
they are being processed, QTAM can 
constantly fill the MS-process queue in 
anticipation Of subsequent GETs. This 
action reduces the time required to provide 
a message in response to a GET by ensuring 
that a message-filled buffer is in the 
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MS-process when a QWAIT is issued by the 
GET routine. 


OTAM uses two methods to constantly 
replenish the MS-process queue subsequent 
to the first GET. The first method is 
initiated by the GET routine and has 
already been described. In summary, when a 
GET is issued, the GET routine issues a 
QPOST to release the buffer used for the 
previous GET. This QPOST causes reading of 
the next segment from the DASD-process 
queue to be started. 


When reading of the next segment is 
completed, the disk-end appendage chains 
the filled buffer into the MS-process 
queue. Thus, the buffer that was released 
from the MS-process queue is replaced by 
another buffer containing data to be 
provided in response to a subsequent GET. 
Additionally, the Disk-End appendage 
continues to initiate disk reads until the 
MS-process queue is full or until there are 
no more unserviced messages in the 
DASD-process queue. 


The second method of replenishing the 
MS-process queue is performed by the 
message control program at the time the 
message segment is received over the line. 
The procedures for receiving a message 
segment destined for a processing program 
are identical to those for a segment 
destined for a terminal up to the point 
when the segment is posted to the DASD 
queue by the Cleanup routine. The buffer 
containing the segment for a processing 
program is posted to a DASD-process queue 
rather than a DASD-destination queue, and 
the following occurs. 


**#* ENTER GET SCHEDULER SUBTASK#*#** 


1. DASD Destination Routine: A relative 
record number is assigned to the 
buffer. If the buffer contains a 
header segment (assumed for this 
discussion), disk locations are 
reserved for the next segment of this 
message (if any) and for the header 
segment of the next message. The 
buffer is then chained into the Disk 
I/O queue to be written on the 
DASD-process queue. Exit is made to 
the Get Scheduler routine. 


2. Get Scheduler Routine: A test is made 
to determine if the MS-process queue 
is full. If the MS-process queue is 
full, any attempt to place the buffer 
in that queue is deferred until a 
previous buffer is returned by a GET. 
However, this discussion assumes that 
the MS-process queue is not full, and 
that a BRB requesting a read of the 
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current buffer is already in the 
Active BRB queue. This BRB is posted 
to the Disk I/O queue behind the 
buffer posted in step 1. 


TRANSFERRING RESPONSE MESSAGES 


When a response message is to be sent toa 


terminal, a PUT macro is issued in the 


message processing program. 


This 


discussion assumes that a complete message 


¥*¥*4#ENTER DISK I/O SUBTASK*#** 
1. 


Disk I/O Routine: At this point, the 
element chain of the disk I/O queue 
contains two elements. The first 

element is a buffer containing a 

header segment to be written on the 
DASD-process queue. The second 

element is a BRB requesting that the 

same header segment (first element) be 

read from the DASD-process queue. The 
relative record number assigned to the 
buffer is converted to an actual DASD 
address, and a request to start the 26 
disk-write operation is posted to the 

LPS queue. The LPS Control routine 

issues an EXCP to start the I/O 

operation, and QWAITs for the next 

item on the LPS queue. The message 

control program then enters the wait 3 
state. 


Disk Interrupt (Write) 


An interrupt from the disk indicates that 
the disk write has been completed. 


4. 


Disk-End Appendage: The buffer and 
the BRB are removed from the disk I/0 


queue. Because the BRB is a request 
to read the buffer that was just 
written, the buffer is simply chained 
in the MS-process queue without 
actually doing the disk read. 
technique has two advantages: 


This 


a. the disk-read operation required 
for the first GET or when the 
MS-process queve is full, is 
eliminated, and 


b. the MS-process queue is 
replenished more rapidly in 
anticipation of subsequent GETs. 


The Disk-End appendage then turns 
on the message-sent bit in the header 
prefix and assigns a sequence out 
number to the message. Control 
returns to the DOS Supervisor with a 
request to rewrite the same buffer on 
the disk. Rewriting of the header 
segment with the message-sent bit on 
is a standard QTAM technique 
indicating that the message has been 
serviced. 


(WU=M) is being PUT. 


Put Message Routine: The message data 
in the work area must be transferred 


into a buffer. A buffer is requested 
for this purpose by posting (QPOST) a 
BRB to the Active BRB queue with a 
priority of X"EC'. (The BRB is 
contained in the first four words of 
the DTF table for the MS-destination 
queue, ) 


*** ENTER ACTIVE BRB SUBTASK*** 


Active BRB Routine: The BRB with high 
priority is passed to the Buffer-BRB 
routine if a buffer is available. 

This discussion assumes that a buffer 
is available. 


Buffer-BRB Routine: A buffer is 
removed from the Available Buffer 
queue, and exit is made to a special 
entry point in the PUT Message 
routine. 


PUT Message Routine (Special 
Entry): This is a special section of 


the PUT Message routine that executes 
in supervisor mode to circumvent a 
violation of the storage protection 
feature. Upon entry, the address of 
the buffer requested is in register 1. 


The terminal table is searched to 
locate the entry for the destination 
terminal specified in the TRMAD field. 
The address of the QCB for the 
DASD-destination queue is obtained 
from the terminal table entry and 
placed in the buffer prefix and in the 
LCB. The message data is moved from 
the work area to the buffer using the 
length specified in the GET/PUT 
prefix. The end-of-message code is 
set in the BSTA field of the buffer 
prefix, and the buffer is posted to 
the DASD-destination queue. 


At this point, the procedures for 
writing the buffer on the disk are 
performed. The action caused by 
posting the buffer to the 
DASD-destination queue is identical to 
that described in the section, Message 
Control Program. When the destination 
line becomes free for sending, the 
message is sent to the terminal as 
described under the Message Control 


Program. 
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If the entire message cannot be 
contained in a single buffer, 
another buffer is requested and 
steps 2 through 4 are repeated. 
This continues until the entire 
message has been transferred to 
buffers, and the buffers posted to 
the DASD-destination queue. The 
end-of-message code is set in the 
prefix of the last buffer required 
for the message. 





***RETURN TO MESSAGE PROCESSING PROGRAM*** 


5. Put Message Routine (continued): The 
QPOST issued by this routine in step 1 


has been completed. Control is 
returned to the instruction after the 
PUT so that the GET/process/PUT cycle 
May continue. 


IBM 2260-2848 LOCAL OPERATIONS 


The IBM 2260 Local differs in operation 
from other QTAM-supported devices. Because 
it is locally attached, the IBM 2260 Local 
is neither polled nor addressed. Instead, 
when the operator at the IBM 2260 desires 
to send a message to the CPU, he keys in 
the START symbol followed by the text, and 
depresses the ENTER key. Depressing the 
ENTER key results in an I/O interrupt with 
the attention bit set in the CSW. This I/O 
interrrupt is referred to as an Attention 


interrupt or read request. 


When an Attention interrupt occurs at 
the CPU, a command control block (CCB) for 
the IBM 2260 initiating the read request 
must be in the DOS channel queue. If it is 
not, the interrupt is ignored by the DOS 
Interrupt Handler. The CCB is a part of 
the terminal table entry for the IBM 2260. 


When an IBM 2260 Local line group is 
opened, the QTAM Open routine causes the 
CCB for each IBM 2260 from which messages 
can be received to be placed in the channel 
queue. A NOP channel program is initiated 
for the IBM 2260. When the CE, DE . 
interrupt ending the NOP occurs, the DOS 
Interrupt Handler passes control to the IBM 
2260 Local Appendage. This appendage sets 
the channel end (CE) flag in the CSW status 
(all other bits are cleared) and returns to 
the DOS Interrupt Handler. The appearance 
of the CE flag along with the device-end 
posting bit (assembled as a one in 
transmission byte zero of the CCB) causes 
the DOS Interrupt Handler to leave the CCB 
on the channel queue so that an Attention 
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Interrupt from that IBM 2260 can be 
recognized and serviced. After the line 
group has been opened, read requests from 
the IBM 2260s are serviced ona : 
"first-come, first-served' basis. 


When an Attention Interrupt occurs, the 
IBM 2260 Local Appendage again gains 
control. The CCB for the IBM 2260 is 
posted to an Attention queue maintained in 
the LCB for the line group. Channel end, 
device end is set in the CSW to cause the 
DOS Interrupt Handler to remove the CCB 
from the channel queue. If the line 
control block (LCB) is available, the 
procedures necessary to perform the read 
operation are initiated immediately. These 
procedures include forming a ring of buffer 


request blocks (BRBs) and assigning the 


buffers required for the read operation. 
Due to the high data rate of the IBM 2260 
Local, all buffers required to contain an 
incoming message must be assigned before 
one read operation is started. This 
differs from the buffer management 
technique used for receiving from remote 
terminals in which only one buffer is 
assigned initially and additional buffers 
are obtained as needed through 
program-controlled interrupts. 


When alli buffers have been assigned, an 
EXCP is issued to read the message. A 
channel end, device end interrupt occurs 
when reading is completed. The IBM 2260 
Local Appendage routes the message-filled 
buffers to the Receive Group of the user's 
LPS section. The CE flag is set in the CSW 
to cause the DOS Interrupt Handler to leave 
the CCB on the channel queue so that any 
subsequent read request from the 2260 can 
be serviced. Processing and further 
routing of the message are the same as 
described for a message received from a 
remote terminal under the Message Control 


Prog ram. 


The general techniques for sending a 
message to an IBM 2260 Local (or to the IBM 
1053 printer attached to the IBM 2848) are 
the same as for sending a message to a 
remote terminal, except that addressing is 
not performed. Additionally, an Svc 25 is 
issued to initiate the write channel 
program. When the write operation 
completes, the IBM 2260 Local Appendage 
causes the CCB to remain on the channel 
queue as described previously. 


Data transfer can occur between the CPU 
and only one IBM 2260 Local at a time. For 
this reason, only one LCB is generated for 
an IBM 2260-2848 Local line group. This 
LCB contains all control information 
required for I/O operations in the line 
group and for LPS processing of messages. 
If a read request (Attention Interrupt) 
from an IBM 2260 occurs while the LCB is 
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not available due to LPS processing of a 
previous message or because QTAM is 
preparing to send a message to a terminal 
in the line group, the CCB is removed from 
the channel queue and posted to the 
Attention queue. The read request is 


serviced when the LCB becomes available for 


receiving. 


For further information, refer to the 
section IBM 2260 Local Appendage. 


MESSAGE PROCESSING PROGRAM FOR AN AUDIO 


APPLICATION 


After the message processing program has 
been loaded from the core image library 
into either the foreground 2 or background 
partition, it is entered for execution by 
the DOS Supervisor at some point when the 
message control program (always in 
foreground 1) enters the wait state. 
Assume that the message processing program 
is executed in foreground 2 partition and 
handles only audio messages. 


***ENTER MESSAGE PROCESSING PROGRAM*** 


INITIALIZATION 


1. QOTAM Open Main Storage (MS) Process 
and Destination Queues File Routine: 


The opening procedure for the 
MS-process queue file is practically 
the same as that used in a nonaudio 
application, because an MS-process 
queue may consist Of audio as well as 
nonaudio messages. But, at assembly 
time in the message control program, a 
PROCESS macro instruction does not 
indicate if it corresponds to a 
message processing program working on 
all types of message or on audio 
messages only. On the other hand, the 
PROCESS macro expansion always 
generates a DASD-process queue, and 
the audio programming uses only the 
QSIL field of the DASD-process QCB to 
obtain the address of the MS-Process 
QCB. However, the ALCBs waiting for 
opening of the message processing 
program and for processing are located 
in the waiting chain of the 
corresponding PROCESS macro expansion, 
and are transferred into the element 
chain of the MS-process queue. Then, 
the open bit is turned on in the 
MS-process queue DTF table. 








2. QTAM Open Audio Line Group/Output 
Queue File Routine: The ARU-Send 


queue address is placed in the Audio 
Output queue DTF table and the open 
bit is turned on. 


OBTAINING A MESSAGE 


The ALCBs containing the input messages to 
be processed may have been transferred at 
open time of the MS-process queue file. 
Assume that the user-defined work area is 
large enough to contain any input message, 
and that the work unit requested by the GET 
macro instruction iS an audio message 
(WU=A). 


1. Get Audio Message Routine: A QWAIT 
(Svc 30) is issued to wait for an ALCB 


in the MS-Process Queue. When no ALCB 
is available, the message processing 
program enters the wait state. Then, 
because both the message control and 
message processing programs are in the 
wait state, the DOS Supervisor gives 
control to a non-QTAM program in the 
background partition. When an ALCB is 
waiting for processing, it is passed 
to the Get Audio Message routine. 

This routine transfers the input 
message from the input buffer (in the 
ALCB) into the user's work area, 
places the message length in the 
GET/PUT prefix, and moves the name of 
the source line into the LINAD field. 
At this point, a high-priority audio 
element is posted to a combined 
OCB/STCB (in the Get Audio Message 
module) to avoid a violation of the 
storage protection feature. 


***ENTER GET AUDIO SUBTASK*** 


2. Get Audio Message Routine (in 
Supervisor Mode): The GET bit in the 


ALCB is turned on, and control is 
passed to the Qdispatch routine. This 
GET bit will be used to check the 
destination line, which must be the 
Same as the source line (no switching 
is allowed) when the user's answer is 
sent via the Put Audio Message 
routine. 


3. Get Audio Message Routine 


(continued): Control is given to the 
instruction following the GET macro 
instruction, to process the message 
according to the user's application. 


Outline of QTAM Operations 45 





TRANSFERRING RESPONSE MESSAGES 


After the message has been processed, the 
user must answer to the calling terminal on 


line. 


Therefore, he provides an output 


message in the form of an address chain, 
and issues a PUT macro instruction. 


1. 


Put Audio Message Routine: The ALCB 
is searched from the line name 


specified by the user in the LINAD 3.6 
field. A check is made for the 

presence of the GET bit in the ALCB. 

If this bit is found, this indicates 

that an audio answer is awaited on the 

line. At this point, a high-priority 

audio element is posted to a combined 


QCB/STCB (in the Put Audio Message 


module) to avoid a violation of the 
storage protection feature. 
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***ENTER PUT AUDIO SUBTASK*** 


Put Audio Message Routine (in 
Supervisor Mode): The message data is 


transferred from the work area into 
the address chain buffer of the ALCB. 
In the ALCB, the address chain length 
is updated, the priority code is set 
to X*°FD', and the GET bit is turned 
off. Then, control is given to the 
Qdispatch routine. 


Put Audio Message Routine 
(continued): The ALCB is posted to 


the ARU Send queue, and control is 
given to the instruction following the 
PUT macro instruction so that the 
GET/process/PUT cycle can continue. 


Note: The action caused by posting 
the ALCB to the ARU Send queue is 
identical to that described in the 


section Message Control Program for an 
Audio Application. 
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This section summarizes the operation of 
each of the LPS routines from which the 
user selects those required for his 
particular message-control functions. The 
routines selected collectively form the 
Line Procedure Specification (LPS) section 
of the message control program. Each LPS 
routine iS contained within a module; each 
module contains a single routine. 


The majority of the LPS routines 
correspond to LPS macro instructions, and 
are linkage-edited into the message control 
program phase because of the inclusion of 
the macro instructions in the message 
control source program. They are entered 
upon execution through linkages generated 
in the macro-expansions. 


The remaining LPS routines are 
generalized routines; each of these is 
linkage-edited into the message control 
program phase because of a linkage 
generated in any of several other LPS 
routines. 


Each of the following LPS routine 
descriptions provides the name of the 
routine, the name of the module that 
contains it, the function of the routine, 
entry point and linkage information, and 
names of external routines used. 


BREAKOFF ROUTINE 


Module Name: IJdJLQBO (Chart BO) 

Entry Point: Expansion of the BREAKOFF 
macro instruction generates a BALR to the 
routine at IJLQBO, uSing register 15 as the 
branch register and register 14 as the 
return register. Register 14 also serves 
aS a parameter register. The parameter 
list passed to the routine consists of the 
maximum length of a message. 


Function: Causes transmission of an 
incoming message to ke terminated and an 
error bit set if the incoming message 
exceeds the maximum length specified, or if 
the characters in the buffer are identical 
(usually an indication of terminal or line 
malfunction). If the characters are not 
identical, the count of characters is added 
to the previous count in the LECT field of 
the LCB. 


The specified maximum length of a 
message is passed to the routine via 
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register 14. If the specified length is 
greater than zero, the accumulated length 
is compared with the length specified. If 
the accumulated length is greater than the 
maximum length, the receive bit in the LSTA 
field of the LCB is turned off. This stops 
further assignment of buffers for this 
Operation and causes a program check 
interrupt to occur. 


If the accumulated length is less than 
Or equal to the maximum length, a test is 
made for end of message. If it is not the 
end of a message, return is made to the 
next LPS instruction; otherwise, a test for 
program check is made. 


If no program check has occurred, return 
is made to the next LPS instruction. Ifa 
program check has occurred, as a result of 
no buffer assignment, the read operation 
code is cleared and the breakoff bit is set 
in the error-halfword (LEHW). The address 
of a CCW with the BREAK command code is 
moved into the CCB area of the LCB, and 
EXCP is issued to write the breakoff 
characters. The routine branches to the 
LPS control routine (IJLOIP20 in module 
IJLQIP) to wait for the breakoff. 


External Routines Used: EXCP (SVC 0) 


CANCEL MESSAGE ROUTINE 


Module Name: IJLQCM (Chart CM) 

Entry Point: Expansion of the CANCELM 
macro instruction generates a BALR to the 
routine at IJLQCM, using register 15 as the 
branch address reyister and register 14 as 
the return register. Register 14 also 
serves aS a parameter list register. The 
parameter list passed to the routine 
consists of the error mask in hexadecimal 
notation. 


Function: Causes the message to be 
canceled when any of the error conditions 
Specified by the error mask is indicated in 
the error-halfword, or when the error mask 
is zero. 


If the error mask is not zero, and none 
of the error conditions specified by the 
mask are indicated in the error-halfword, 
return is made to the next LPS instruction. 
When any of the error conditions specified 
by the error mask is indicated in the 
error-halfword, or when the error mask is 
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zero, linkage is made to the Recall routine 
to obtain the message header. 


After the header segment is returned 
(address in register 6) by the Recall 
routine, the cancel bit is set in the 
buffer status byte (BSTA) of the header 
prefix. This effects cancellation of the 
message. A zero is moved into the LMPL 
byte of the LCB to cancel the multiple 
route option. This effects cancellation of 
the message for any further destination 
that may be specified in the message 
header. Also, the converse pit is turned 
off so that the line is not left connected 
unnecessarily. Return is then made to the 
next LPS instruction. 


Note: Linkage to the Recall routine is not 
performed if an invalid destination 
specification was previously detected for 
this message. The header need not be 
recalled because QTAM previously routed it 
to a special error queue on the DASD. 





External Routines Used: Recall (IJLOIP22 


in module IJLOIP). 


DISTRIBUTION LIST ROUTINE 


Module Name: IJLQODL (Chart DL) 


Entry Points: 


1. This routine is entered at IJLQDL + 14 
from the QTAM SVC/Subtask Control 
Routine. Entry at this point occurs 
when the Distribution List subtask is 
dispatched because the Distribution 
List QCB appears at the top of the 
Ready Queue. The Distribution List 
QCB appears on the Ready Queue when an 
incoming message has a distribution 
list as its destination. 


2. A second entry point into the 
Distribution List routine is made from 
the Cleanup routine (IJLQIP23 in 
module IJLQIP). This entry is to an 
unlabeled instruction. 


Function: Implements multiple routing of a 
Single message by causing a copy of the 
message to be placed on the DASD queue for 
each of the several destinations contained 
in a distribution list as defined by a LIST 
macro instruction. 


This routine is composed of two 
separate, but related, sections of code. 
The first section (explained in item 1, 
which follows) of code is entered from the 
QTAM SVC/Subtask Control routine and 
performs an initialization procedure 
necessary for multiple routing via a 
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distribution list. The second section of 
code (item 2, which follows) is entered 
from the Cleanup routine each time that 
routine is performing its function of 
routing the incoming message to its 
appropriate DASD queue. 


The second section performs the function 
of recalling the header segment from the 
DASD and causes the current segment to be 
placed on the DASD queue for the next 
destination specified in the distribution 
list. 


1. First section of Distribution List 
routine: This section of code is 
entered when a distribution list is 
specified as the destination for a 
message. It obtains the address of 
the LCB and the destination key 
(relative address) of the distribution 
list entry from the buffer prefix, and 
places the destination key into the 
LDLD field of the LCB. 


The terminal table entry for the 
first entry in the list is accessed, 
and the QCB address for this 
destination is placed into the LCB 
(LODT field) and into the buffer 
prefix (BOQAD field). The relative 
address of the terminal table entry is 
also placed into the prefix (BTDO 
field). Exit is then made (via a 
direct branch) to the Priority Search 
(QSVCPRI) subroutine in the 
SVC/Subtask Control routine. This 
exit causes the filled buffer to be 
posted to the QCB for the first 
destination in the list. 


If this is the first time this 
routine has been entered, linkage is 
made to the End Insert Routine before 
exiting to the Priority Search 
subroutine. The End Insert routine 
causes the address of the second 
section of the Distribution List 
routine to be placed permanently into 
the chain of routines to be entered 
from the Cleanup routine in its 
handling of each incoming message 
segment. After the first time, this 
entry into the End Insert routine is 
not made (use of the End Insert 
routine is described in detail in the 
description of the EOA routine). 


2. Second section of the Distribution 
List routine: This section of code is 
entered from the Cleanup routine 
(after its address is placed in the 
Cleanup address chain as described 
above) each time the Cleanup routine 
has completed the routing of a message 
segment to the appropriate DASD queue. 
If multiple routing via a 
distributionlist is not in progress 


— 








orhas been completed (indicated by 

zeros in the LDLD field of the LCB or 
by the dummy last entry in the list), 
return is made to the Cleanup routine 
via the return address in register 14. 


If multiple routing is in progress, 
i.se., there is another valid entry in 
the distribution list, the terminal 
table entry for that destination is 
accessed, and its QCB address is 
placed into the LCB (LQDT field). The 
LDLD field is updated for accessing 
the next entry in the list. Linkage 
is then made to the Recall routine to 
obtain a copy of the header. 


Upon return, the relative address 
of the terminal table entry for this 
destination is placed into the BTDO 
field of the buffer prefix. Exit is 
then made to the beginning of the 
Cleanup routine (IJLQIP23 in module 
IJLQIP). This causes the current 
segment to be posted to the queue for 
this destination. After posting this 
segment, Cleanup returns to this 
section of the Distribution List 
routine for handling of the next entry 
in the list. This continues until all 
entries in the distribution list have 
been processed. 


External Routines Used: 

Recall (IJLOIP22 in module IJLOIP) 
Cleanup (IdJLQIP23 in module IJLQIP) 
End Insert (IJLONDRT in module IJLOIP) 


Priority Search (QTAM nucleus) 


DATE STAMP ROUTINE 


Module Name: IJLQDT (Chart DT) 

Entry Point: Expansion of the DATESTMP 
macro instruction generates a BALR to the 
routine at IJLQODT, using register 15 as the 
branch address register and register i4 as 
the return register. Register 14 serves 
also as the parameter list register. The 
parameter list passed to the routine 
consists of one item: a halfword 
containing, in binary, the length (9) of 
the date field to be inserted in the 
message header. 


Function: Obtains the current date from 
the DCS communication region, and inserts 
it in the message header in either the 
format bmm/dd/yy or bdd/mm/yy, where b is a 
blank, dd is the day, mm the month, and yy 
the year. Prior to inserting the date, the 


routine links to the Expand Header routine, 
which “expands" the header by shifting, 
nine places to the left, all message 
characters preceding the place in the 
header where the date is to be inserted. 
The date is inserted in the field thus 
created. Return iS made to the next LPS 
instruction. 


External Routines Used: Expand Header 


(module IJLOQEX) 


END OF ADDRESS (EOA) ROUTINE 


Module Name: IJLQEA (Chart EA) 


Entry Points: 


1. Expansion of the EOA macro instruction 
generates a BALR to the Message Type 
routine at IJLOMT, using register 15 
as the entry register and register 14 
as the return register. Register 14 
also serves aS a parameter list 
register. The parameter list passed 
to the Message Type routine consists 
of the size of the EOA character 
sequence (one to eight) and the actual 
EOA character sequence specified in 
the macro. Parameter register 1 
contains the address of the End of 
Address (EOA) routine. If the Message 
Type routine does not find the 
specified EOA sequence in the next 
nonblank field of the header, it 
effects linkage to the EOA routine at 
IJLQEA. 


2. A second entry point into the EOA 
routine is effected from the Cleanup 
routine (IJLOIP23 in module IJLQIP). 
This entry is to an unlabeled 
instruction that begins a separate 
section of code executed only when 
entry is from the Cleanup routine. 
The address of the LCB for the line 
over which the current message was 
received is passed in register 4. 


Function: Causes multiple routing of an 
incoming message when more than one 
destination is specified in the header. 


The EOA routine is divided into two 
separate, but related, sections of code. 
The first section, item 1 which foilows, is 
entered from the LPS (via the Message Type 
routine) and performs the function of 
locating each successive destination code 
specified in the header of the message. It 
also performs an initialization procedure 
that causes the second section of code to 
be executed at the appropriate time. 
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The second section of code, item 2 which 
follows, is entered from the Cleanup 
routine each time that routine is 
performing its function of routing the 
incoming message to its appropriate 
destination queue on the direct-access 
storage device (DASD). This second section 
performs the function of recalling the 
header segment from the DASD and causing 
the current segment to be placed on the 
DASD destination queue for each destination 
(after the first) specified in the message 
header. 


1. First Section of EOA routine: This 
section of code is entered from the 
EOA macro expansion (via the Message 
Type routine) for handling of each 
Successive destination code in the 
header. When the Message Type routine 
finds the specified EOA sequence in 
the header, it does not enter the EOA 
routine because this is a Signal that 
all destination codes have already 
been handled. Instead, it returns to 25 
the next instruction in the EOA 
macro-expansion. 


When entered, this section of the 
EOA routine computes and saves (in the 
LMPL field of the LCB) the offset from 
the start of the header to the next 
destination code in the header. (The 
previous destination code was located 
by the Route Message routine.) 


If this is the first time the EOA 
routine has been entered (from any 
LPS), it links (BAL) to the End Insert 
routine in module IJLOIP. The End 
Insert routine places the address of 
the second section of the EOA routine 
into a chain of addresses (by 
priority); the addresses in this chain 
are the addresses of routines to be 
entered from the Cleanup routine in 
its handling of each incoming message. 


The End Insert routine is never 
entered again from EOA while QTAM is 
active. This is accomplished by an 
instruction modification technique as 
follows: Prior to returning to the 
EOA routine, the End Insert routine 
overlays the second operand of the BAL 
instruction (in the EOA routine) with 
the address of the Skip Character Set 
routine (module IJLQSK). End Insert 
then returns, via the return register 
minus four, to the same BAL 
instruction. Thereafter, the BAL 
instruction is always a branch to the 
Skip Character Set routine. 
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After computing the offset to the 
next destination code (or after return 
from End Insert on the first entry as 
just described), the EOA routine exits 
to the Skip Character Set routine. 
This routine advances the scan point 
past the specified EOA character 
sequence (bypassing any intervening 
destination codes) and returns to the 
next instruction in the EOA macro 
expansion. 


The instruction in the EOA macro 
expansion to which control is returned 
makes a test to determine if a 
Guplicate message header is being 
handled. If the header is not a 
duplicate, normal LPS header 
processing continues. If it isa 


duplicate header, a branch is made to 


the ENDRCV macro expansion because LPS 
header processing has already been 
performed for this header. 


Second Section of EOA routine: This 
section of code is entered from the 
Cleanup routine (after its address is 
placed in the Cleanup address chain as 
just described) each time the Cleanup 
routine has completed the routing of a 
message to the appropriate DASD 
destination or process queue. If 
multiple routing is not in progress or 
has been completed (indicated by a 
zero in the LMPL field of the LCB), 
return is made to the Cleanup routine. 


If multiple routing is in progress, 
i.e., if there is another destination 
code to be handled in the header, 
linkage is made to the Recall routine 
(IJLOIP22 in module IJLOIP, charts 16, 
17) to obtain a duplicate copy of the 
header. The scan pointer (register 5) 
is reset to point to the next 
destination code in the header by 


using its offset previously computed 


and saved in the LMPL field of the 
LCB. The LMPL field is then set to 
zero. Exit is then made to the Route 
Message routine which handles the next 
destination code and exits to the 
first instruction of the EOA macro 
expansion in the appropriate LPS 
(actually the return address 
established by the ROUTE macro 
expansion and saved by the Route 
routine). 


Execution of both sections of the 
EOA routine is repeated until all 
destination codes in the header have 
been handled. 
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External Routines Used: 

Skip Character Set (module IJLQSK) 

End Insert (IJLQONDRT in module IJLQIP) 
Recall (IJLQIP22 in module IJLQIP) 


Route Message (module IJLQRG) 


END OF BLOCK ROUTINE 


Module Name: IJLQEB (Chart EB) 

Entry Point: Expansion of the EOB macro 
instruction or of the ENDRCV macro 
instruction (if this macro is present ina 
WITA LPS) generates a BALR to the routine 
at IJLQEB, using register 15 as the entry 
register and register 14 as the return 
register. No parameters are passed. 


Function: The function of this routine 
depends on whether it is entered from the 
EOB macro expansion or from the ENDRCV 
macro expansion. 


1. This routine is entered from the EOB 
macro expansion whenever a message 
block (delimited by an EOB or EOT 
character) has been received or sent. 
The routine performs error checking on 
the transmission and causes a read or 
write continue operation to be 
initiated if the message block was 
received or sent without error. 


If the message has been cancelled, 
an error message sent, or the message 
rerouted, return iS made to the next 
LPS instruction. Similarly, if the 
status byte of the CSW indicates an 
end of transmission, a unit exception, 
or that the residual count in the CSW 
is zero, return is to the next LPS 
instruction. If none of the preceding 
conditions are detected, the 
End-of-Block bit in the buffer prefix 
is set because there was a positive 
indication that this message was sent 
or received correctly. 


In setting up for sending the next 
block, the scan pointer is adjusted to 
segment Size and stored in the header 
prefix. The LECB halfword in the LCB 
is updated by storing the segment size 
in this field. Otherwise, a write 
continue indication is set in the LOPC 
field of the LCB. This causes the 
Physical I/O routine, when entered, to 
generate a write continue channel 
program to write the next block of the 
ressage. 





If the transmission was a read 
operation, the read continue indicator 
is set in the LOPC field of the LCB. 
This causes the Physical I/O routine, 
when entered, to generate a read 
continue channel program to read the 
next block of the message. For both 
operations the buffer is set to be 
reused. The routine exits to the 
Physical I/O routine which generates 
and initiates execution of the 
appropriate channel program. 


2. This routine is entered from the 
ENDRCV macro expansion to test the WRU 
flag in the LCB. If this flag is off, 
return is made to the next LPS 
instruction. If the WRU flag is on, 
this indicates that the last received 
character is WRU. In this case, an 
exchange of identification sequences 
must be performed. The EOB bit in the 
buffer prefix is set, and the buffer 
is set to be reused. The Read 
Continue indicator is set in the LOPC 
field of the LCB. The End-of-Block 
routine exits to the Physical I/O 
routine, which generates and initiates 
execution of the appropriate channel 
program. This channel program 
performs an exchange of identification 
Sequences and reads the rest of the 
input message, provided EOM is 
different from WRU. 


External Routines Used: QTAM Physical I/0 
(module IJLQRW) 


END OF BLOCK AND LINE CORRECTION ROUTINE 


Module Name: IJLOQOEC (Chart EC) 

Entry Point: Expansion of the EOBLC macro 
instruction generates a BALR to the routine 
at IJLQEC, using register 15 as the entry 
register and register 14 as the return 
register. No parameters are passed. 


Function: This routine is entered from the 
EOBLC macro expansion whenever a message 
block (delimited by an EOB or EOT 
character) has been received or sent. In 
general, the routine performs error 
checking on the transmission and causes a 
read or write continue operation to be 
initiated if the message block was received 
or sent without error. 


If the message has been canceled, an 
error message sent, or the message 
rerouted, return is made to the next LPS 
instruction. If the error halfword in the 
LCB indicates a transmission error, the 
retry counter is incremented by one. If 
retransmission has already failed three 
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times, the cancel bit is set in the LDFG 
field of the LCB for the line so that 
Succeeding segments of the message in error 
will be cancelled, and return is made to 
the next LPS instruction. If not, the 
routine branches and links to the Recall 
routine to obtain the header. If the line 
is sending to a remote terminal, the write 
continue indicator is set in the LOPC field 
of the LCB, and the routine exits to the 
Start of the LPS for another try at 
transmission. Prior to the exit the 

error halfword is cleared for the retry. 


BOBLC iS also used to initiate a retry 
operation if a bus-out check occurred while 
sending to an IBM 2260 or IBM 1053 locally 
attached. The IBM 2260 Local Appendage 
sets an indicator in the LOPC field of the 
LCB to indicate the operation to be 
retried. 


as 
| Failing Operation 


| 

| -=========-==-= === $-== === =====-=-=----- 

| Write Initial to | Erase, Write Initial| 
| IBM 2260 Local | | 
}~------------------ }--------------------- { 
| Write Initial to | Write Initial | 
| IBM 1053 Local | | 
}~------------------ }--------------------- { 
| Write-at-line- | Write-at-line- | 
| address to IBM | address | 
{| 2260 Local | | 
a ep een erea ee EEN EN a Pa eee Ba Se she ta es J 


After recalling the Header of the 
message in error (via linkage to the Recall 
routine), exit is made to the start of the 
LPS for retry. If the error occurs a 
second time, EOBLC returns to the next 
in-line LPS instruction for user error 
processing. 


If the line iS receiving, action is 
taken to retry receiving the message. If 
there is no EOB present in any buffer 
position other than the last position, the 
cancel bit of the BSTA field in the prefix 
1s set. The sequence-in number in the TSIN 
field of the terminal table entry is 
adjusted to account for the retry. Linkage 
is made to the Recall routine to optain the 
header. The Scan pointer and the LEOB 
field of the LCB are updated. Any Space in 
the header area that is reserved for time, 
date, and Sequence-out number insertions 
are filled with idle characters. The 
distribution list and multiple routing 
indicators are cleared, and the error 
halfword is reset to zero. The retry 
indicator is set in the LOPC field of the 
LCB. 


The buffer size is stored in the BSSZ 


field of the prefix to indicate the message 
Size, and the buffer is set for reuse. 
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Exit is to the Physical I/O routine which 
initiates the retry. If there were no 
transmission errors, tests are made in the 
CSW. If the status byte of the CSW 
indicates an end of transmission, a unit 
exception, or that the residual count in 
the CSW is zero, return is to the next LPS 
instruction. The End of Block bit in the 
prefix is set, because there was a positive 
indication that this message was sent or 
received correctly. 


In setting up for sending the next 
message, the scan pointer is adjusted to 
segment size and stored in the header 
prefix. The retry counter is set to zero 
in the LEHW field of the LCB. The LEOB 
halfword is updated by storing the segment 
size in this field. If the transmission 
waS a write operation, a test is made to 
see if the next character to be written is 
an End of Transmission. If the next 
character is an EOT, there is no further 
execution of the routine, and a return is 
made to the next LPS instruction. 
Otherwise, the write continue indication is 
set in the LOPC field of the LCB and exit 
is made to the Physical I/O routine. 


If the transmission was a read, the 
read-continue indicator is set before exit 
to the Physical I/O routine. The Physical 
I/O routine generates and initiates 
execution of the appropriate channel 
program to continue reading or writing the 
next block of the message. 


External Routines Used: 
QTAM Physical I/O (module IJLQRW) 


Recall (IJLQIP22 in module IJLQIP) 


ERROR MESSAGE ROUTINE 


Module Name: IJLQER (Chart ER) 

Entry Point: Expansion of the ERRMSG macro 
instruction generates a BALR to the routine 
at IJLQER, uSing register 15 as the entry 
register and register 14 as the return 
register. Register 14 serves also as a 
parameter list register. The parameter 
list passed to the routine consists of the 
error maSk in hexadecimal notation. 
Register 0 contains the length of the error 
message (0 if an address is specified). 

The address of an area that contains the 
destination code is passed in register 2, 
and the address of the error message text 
is passed in register 1. 


Function: Causes a user-written error 
message to be sent to a designated terminal 
when any of the error conditions specified 


Ss) 











in the error mask is indicated in the 
error-halfword, or when the error mask is 
zero. If the error mask is not zero and 
none of the error conditions specified by 
the error mask are indicated in the 
error-halfword, return is to the next LPS 
instruction. When an error condition is 
encountered, linkage is made to the Recall 
routine (in module IJLQIP) to obtain the 
header. A test is made for the option of 
including the header of the message in the 
error message. 


If the header is not to be included, the 
scan pointer is reset to the beginning of 
the header of the message in error. The 
specified error message then overlays the 
header. 


If the header is included, the pointer 
remains positioned at the end of the 
header. The text area of the buffer is 
loaded with the error text. If the error 
message exceeds the space in the buffer, 
the text is truncated. The size of the 
message iS stored in BSSZ field of the 
prefix, and a Single segment message is 
indicated in the BSTA field of the prefix. 


If the error message is to be sent 
because Of an invalid incoming sequence 
number, the error message will be scanned. 
If the special character $ is encountered, 
the correct input sequence number is moved 
into the four bytes following the $, and 
the $ is overlaid with a blank. If a 
second § is found before the end of the 
error message, the invalid sequence number 
is moved into the four bytes following the 
S$, and this second $ is also overlaid with 
a blank. 


Linkage is made to the Lookup Terminal 
Table Entry routine, which looks up the 
destination code in the terminal table and 
places the relative address of its terminal 
table entry in the BDTO field of the header 
prefix. Return to the next LPS instruction 
is made by the Lookup routine. 


External Routines Used: 
Recall (IJLQIP22 in module IJLOQOIP) 


Lookup Terminal Table Entry (Module IJLQOLK) 


EXPAND HEADER ROUTINE 


Module Name: IJLGEX (Chart EX) 

Entry Point: The routine is entered via a 
BALR from SEQOUT, TIMESTMP, and DATESTMP; 
register 15 is the branch address register 
and register 3 is the return register. The 
address of the parameter list is passed to 


Function: 


the routine in register 14. The parameter 
list contains the number of spaces the 
header is to be expanded. 


Creates in the message header 
the space needed to insert a new field in 
the header. 


The number of characters to be shifted 
is computed by subtracting from the value 
in the scan pointer register the sum of the 
address of the buffer plus 31 (so as not to 
include the prefix) plus the number of 
characters to be expanded. If the result 
is negative, return is made to the next LPS 
instruction, because there is no space for 
the shift. If there is space available, 
all message characters that have already 
been processed are shifted to the left of 
the specified amount. 


After the characters of the header have 
been shifted, a blank is inserted as a left 
delimiter at the start of the created 
field. The scan pointer offset for the 
next header destination code (saved in LMPL 
field of the LCB) is decremented by the 
length of the new field in case multiple 
routing is in progress. Return is to the 
calling routine. 


External Routines Used: None 


INTERCEPT MESSAGE ROUTINE 


Module Name: IJLOQIT (Chart IT) 

Entry Point: Expansion of the INTERCPT 
macro instruction generates a BALR to the 
routine at IJLQIT, using register 15 as the 
entry register and register 14 as the 
return register. Register 14 serves also 
aS a parameter list register. The 
parameter list passed to the routine 
consists of the specified error mask in 
hexadecimal notation. The parameter 
register 1 contains the address of an 
optional subfield in the terminal table 
defined by the user to contain the relative 
record number of the message being 
intercepted. 


Function: Causes suppression of all 
message transmission to a terminal when any 
of the error conditions specified by the 
mask is indicated in the error-halfword, or 
when the error mask is specified as zero. 


If the error mask is not zero, and none 
of the error conditions specified by the 
mask are indicated in the error-halfword, 
return is to the next LPS instruction. If 
the intercept function is to be performed, 
the routine makes linkage to the Recall 
routine to recall the header. 
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Upon return from Recall, the routine 
turns off the serviced bit and turns on the 
priority bit in the header prefix so that a 
new sequence number is not assigned. The 
send bit in the TSTA byte of the terminal 
table entry for the destination terminal is 
turned off to indicate that messages on the 
queue for the destination are to be 
withheld from transmission. If the 
intercept bit in the TSTA byte is on, 
indicating that a previous header disk 
address is in the Intercpt subfield, and if 
the header disk address is greater than the 
disk address already in the Intercpt 
subfield, return is to the next LPS 
instruction. 


If the header disk address is less than 
the address in the Intercpt subfield or if 
the intercept bit in the TSTA byte is not 
on, the intercept bit is set to one, to 
indicate that a message on the queue was 
not transmitted, and the header disk 
address is put into the Intercpt subfield 
in the user area of the terminal table 
entry. The offset of the intercept 
subfield from the beginning of the terminal 
table entry is computed and saved (for use 
by the Release Message routine) in a byte 
reserved by the expansion of the LPSTART 
macro. Return is to the next LPS 
instruction. 

External Routines Used: Recall (IJLQIP22 
in module IJLOQIP) 


AUDIO INPUT MESSAGE LOGGING ROUTINE 


Module Name: IJLQLG (Chart LG) 

Entry Point: The Logging routine is 
entered at IJLOLG via linkage from the 
LOGSEG macro expansion when the ARU operand 
has been specified. Upon entry, register 4 
contains the address of the ALCB of the 
line requiring the input message logging. 


Function: Prepares in the ALCB the 
preformatted prefix to be logged with the 
input message. This prefix immediately 
precedes the input buffer and includes, in 
succession: 


1. Logical unit number of the symbolic 
line assignment ("nnn" of SYSnnn) 


2. Length of the input data to be logged 
3. Date stamped information 


4. Time stamped information when the 
timer is available and the keyword 
operand LOGTIME=YES has been specified 
in the DTF line group of the line. 

The unused part of the buffer is reset 
to binary zeros. 
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Register 2 contains the address of the 
first byte of the prefix, and control 
returns to the next instruction in the 
LOGSEG macro expansion. 


External Routines Used: None. 


LOOKUP TERMINAL TABLE ENTRY ROUTINE 


Module Name: IJLOLK (Chart Lk) 

Entry Point: The Lookup routine is entered 
at IJLOLK via linkage from the DIRECT macro 
expansion or via a direct branch from the 
Error Message, Route Message, or Reroute 
Message routine. Upon entry, register 2 
contains the address of the work area 
containing the name to be looked up. 


Function: Obtains, in succession, the name 
contained in each terminal table entry and 
compares it with the name provided ina 
work area. Each time a nonequal compare 
results, the process is repeated with the 
name from the next terminal table entry. 
When an equal compare results, the routine 
obtains, from the terminal table entry, the 
address of the queue control block for the 
destination (or process) queue, and places 
this QCB address in the LODT field of the 
LCB. The offset of the entry relative to 
the beginning of the terminal table is 
placed in the BDTO field of the buffer 
prefix. 


If the terminal name in the work area 
does not compare with any entry name in the 
terminal table, the routine turns on the 
invalid destination bit (bit 0) in the 
error-halfword, and places the address of 
the QCB for the error (dead-letter) queue 
in the LODT field of the LCB. 


External Routines Used: None 


CONVERSATIONAL MODE ROUTINE 


Module Name: IJLQMC (Chart MC) 


Entry Points: 


1. If there is no character specified in 
the second operand of the macro, the 
expansion of the MODE macro 
instruction generates a BALR to the 
routine at IJLQMC, uSing register 15 
as the entry register and register 14 
as the return register. If there isa 
character specified in the second 
operand, the address of the 
Conversational Mode routine is passed 
in register 1 to the Message Mode 
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Interface routine (module IJLQOMM) 
which enters this routine at IJLQMC if 
the specified character is found in 
the header. 


A second entry into the Conversational 
Mode routine is made from the Cleanup 
routine to an unlabeled entry point. 
This is a separate section of code 
that is executed only when entry is 
from the Cleanup routine. The address 
of the LCB for the line that is to 
operate in conversational mode is 
passed in register 4. 


Function: Causes the line over which the 


current message is being received to be 
placed in a conversational mode; that is, 
the line connection is maintained until a 
reply to the inquiry is sent. 


The Conversational Mode routine is 


composed of two separate, but related, 
sections of code. The first section, item 
1 that follows, performs the initialization 
procedures necessary for the conversational 
mode function to Le implemented. The 
second section of code, item 2 that 
follows, implements the function. 


: 


First section of Conversational Mode 
routine: This section of code is 
entered from the MODE macro expansion 
(unconditional CONVERSE) or from the 
Message Mode Interface routine 
(conditional CONVERSE). Entry is at 
IJLOMC. The “converse" bit is set in 
the LSTA (line status) byte of the 
LCB. 


If this is the first time this 
routine has been entered, linkage is 
made to the End Insert routine 
(ITJLONDRT in module IJLQIP). End 
Insert performs an initialization 
function that ensures that the second 
section of the Conversational Mode 
routine is executed (via an entry from 
the Cleanup routine) at the proper 
time. (The function performed by the 
End Insert routine is identical to 
that described under the ECA routine.) 
Return is to the next LPS instruction. 


Second Section of the Conversational 
Mode routine: This section of code 
is entered (at an unlabeled entry 
point) from the Cleanup routine during 
its handling of each message. If the 
converse bit is not on (in LSTA field 
of LCB), if there has been a polling 
or addressing error is on the line, 
orthe destination is not a processing 
program, the request for 
conversational mode is ignored and 


return is made (via register 14) to 
the Cleanup routine. 


If the line is still receiving, 
exit is made to the LPS Control 
routine to wait for completion of the 
incoming inguiry message. If the line 
is sending, the line is turned around 
to receive by setting the converse and 
receive bits in the LSTA field of the 
LCB. 


The QCB for the process queue (to 
which the inquiry is being directed) 
is assigned a high priority to ensure 
most rapid handling of the inquiry 
message and its reply. If the end of 
the polling list for the line (if 
nonswitched) has been reached, the 
pointer to the current polling list 
entry (LPPT field of LCB) is reset to 
the beginning of the polling list. 
Exit is made to the LPS Control 
routine to continue processing. 


The buffer containing the inquiry 
message was flagged to indicate 
conversational mode. When this buffer 
is released after completion of a GET 
by the processing program, the Return 
Buffer routine (in module IJLOIP) 
posts this buffer to the LPS Queue. 
When this buffer is obtained from the 
LPS Queue by the LPS Control routine, 
control returns to the Conversational 
Mode routine (via the Cleanup 
routine). The Conversational Mode 
routine then begins a scan to 
determine if a message (the reply) is 
on the DASD queue for the source 
terminal (that is, the terminal that 
initiated the inquiry). 


If no message is on the queue (or 
if the source terminal was not 
identified), exit is made to the 
Cleanup routine. If there is a 
message, initialization procedures are 
performed for sending the reply: the 
send bit is set in the LSTA field of 
the LCB, and the write initial 
indicator is set in the LOPC field. 
The buffer containing the original 
inguiry message is released, via a 
QPOST, to the Available Buffer queue. 


The disk address of the reply message 


header is placed into the LCB. A 
request for sending the reply is 
posted (via a QPOST) to the Disk I/O 
queue (this causes the Disk I/0 
subtask to be activated for reading 
the reply from disk and most rapid 
sending of the reply message). Exit 
is made to the LPS Control routine to 
continue normal processing. 
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External Routines Used: 


LPS Control (IJLQIP20 in module IJLQIP) 


End Insert (IJLONDRT in module IJLQIP) 


INITIATE MODE ROUTINE 


Module Name: IJLQMI (Chart MM) 

Entry Point: If there is no specified 
character in the second operand of the 
macro, the expansion of the MODE macro 
instruction generates a BALR to the routine 
at IJLQMI, using register 15 as the branch 
address register and register 14 as the 
return register. If there is a character 
specified in the second operand, the 
address of the Initiate routine is placed 
in the parameter register 1, and the 
routine is entered by a branch from the 
Message Mode Interface routine. 


Function: The routine sets the Initiate 
bit in the LSTA field of the LCR. Return 
is to the next LPS instruction. 


External Routines Used: None 


MESSAGE MODE INTERFACE ROUTINE 


Module Name: IJLQOMM (Chart MM) 

Entry Point: Expansion of the MODE macro 
instruction generates a BALR to the routine 
at IJLQMM, uSing register 15 as the branch 
address register and register 14 as the 
return register. The parameter list passed 
to the routine in register 14 contains the 
character that is to be compared with the 
first nonblank character in the header. 
Register 1 is a parameter register that 
contains the address of the routine that is 
specified by the first operand of the 
macro. 


Function: This routine is entered when 
there is a specific character specified in 
the second operand of the MODE macro. 
Linkage is made to the Scan Header routine 
to obtain the next nonblank character in 
the header. If the character, provided by 
the Scan routine, is identical to the one 
specified in the MODE macro, the routine 
branches to the routine designated in the 
first operand. If the characters do not 
match, the scan pointer is restored, and 
return is made to the next LPS instruction. 
External Routines Used: Scan Header 
(Module IJLQSH) 
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PRIORITY MODE ROUTINE 


Module Name: IJLQOMP (Chart MM) 

Entry Point: If there is no specified 
character in the second operand of the 
macro, the expansion of the MODE macro 
instruction generates a BALR to the routine 
at IJLQMP, uSing register 15 as the branch 
address register and register 14 as the 
return register. If there is a character 
specified in the second operand, the 
address of the Priority Mode routine is 
placed in parameter register 1, and the 
routine is entered by a branch from the 
Message Mode Interface routine. 


Function: Linkage is made to the Scan 
Header routine which obtains and provides 
the address of the first nonblank character 
in the header. The first nonblank 
character is moved into the LTPR field of 
the LCB and becomes the priority of the 
message. Return is made to the next LPS 
instruction. 

External Routines Used: Scan Header 
(Module IJLOQOSH) 


MESSAGE TYPE ROUTINE 


Module Name: IJLQOMT (Chart MT) 

Entry Point: Expansion of the MSGTYPE 
macro instruction generates a BALR to this 
routine at IJLOMT, using register 15 as the 
branch address register and register 14 as 
the return register. Register 14 serves 
also as a parameter list register. The 
parameter list passed to the routine 
consists of a halfword containing the field 
size and a constant containing the 
character sequence with which the scanned 
character sequence is to be compared. 


Function: Saves the scan pointer, then 
links to the Scan Header routine, which 
obtains and provides to the Message Type 
routine the next character sequence in the 
message header. The Message Type routine 
compares the character sequence provided 
with the character sequence specified in 
the MSGTYPE macro statement. 


If the character sequences are 
identical, the routine branches to the next 
executable LPS instruction. If they are 
not identical, the routine restores the 
scan pointer and branches to the next 
MSGTYPE or delimiter macro in the LPS, thus 
bypassing any instructions preceding the 
next MSGTYPE or delimiter macro. Because 
the scan pointer is restored when the two 
character sequences are not the same, a 








series of Message Type routines may be 
executed, each examining the same message 
type character sequence in the header. 
External Routines Used: Scan Header 
(Module IJLQSH) 


OPERATOR CONTROL ROUTINE 


Module Name: IJLQOC (Charts OC, OD, OE, 
OF, OG, and OH) 


Entry Point: Expansion of the CPCTL macro 
instruction generates a BALR to the 
Operator Control routine at IJLQOC. 
Register 15 is the branch register, 
register 14 is the return register, and 
register 1 contains the address of a 
parameter list generated by the macro 
instruction. 


Function: Interpreting, selecting, and 
performing a control operation requested by 
the user by entering a message from a 
user-specified control terminal. 


The routine is branched to if the code 
generated by the macro instruction 
determines that the message is being sent 
from an operator control terminal. The 
routine compares the next field in the 
buffer with the specified control message 
identifier. If it is not equal, return is 
made to the next LPS instruction. The 
routine tests if the scan pointer has run 
out of the header. If yes, the scan 
pointer is reset to where it was when the 
OPCTL macro instruction gained control, and 
return is made to the next LPS instruction. 
The routine tests if the message is to be 
cancelled. If yes, the message is routed 
back to the terminal that sent the message 
by the Routing subroutine. 


The routine then branches to the Scan 
Header routine to access the next field in 
the header. Upon regaining control, it 
tests to determine if the field is a valid 
operator control operation. If it is not, 
the message is routed back to the terminal 
that sent the message by the Routing 
subroutine. If it is valid, the routine 
selects the correct subroutine for the 
operation and branches to it. The 
operation subroutines are discussed in 
detaii. Also discussed are four auxiliary 
subroutines used Ly more than one operation 
subroutine, SUB1, SUB2, UNPAK, and ROUTE 
(the Routing subroutine). 


CHNGT Operation Subroutine: The subroutine 


branches to SUB1, which returns to the 

CHNGT Operation subroutine the address of 
the terminal table entry for the terminal 
specified in the operator control message 


and the number of bytes in the buffer 
following the termname operand. 


The information in the buffer, from the 
beginning of the data field to the end of 
the buffer, is translated according to a 
special translate table labeled TABLETRN. 
Use of this table translates IBM 1050 code 
into hexadecimal. 


A translate-and-test instruction is then 
executed on the buffer from the beginning 
of the data field to the end of the buffer. 
The table used with this instruction 
(TABLETST) causes the instruction to halt 
whenever a byte is tested that is not equal 
to one of the bytes X'FO" through X"FF'. 


If the instruction exhausts the buffer 
count without a halt, the message is 
returned to the source terminal via the 
Routing subroutine. If the instruction 
halts, the byte at which the instruction 
halted is tested to determine if it is one 
of the valid delimiting characters for the 
data field (blank, EOB or EOT). If it is 
not, the message is returned to the source 
terminal via the Routing subroutine. 


The subroutine tests to determine if the 
number of characters in the data field 
(excluding the delimiting character) is 
even. If it is not an even number, the 
message is returned to the source terminal 
via the Routing subroutine. 


The subroutine tests to determine if the 
number of characters in the data field 
(excluding the delimiting character) can 
fit into a single terminal table entry. If 
not, the message is returned to the source 
terminal via the Routing subroutine. 


The subroutine then posts the Change 
Terminal Table Entry OCB to itself via a 
QPOST (SVC 31). The Change Terminal Table 
Entry subtask is entered in supervisor 
state. 


The subtask tests the QCB for the 
terminal table entry to make sure that the 
entry is for a terminal. If it is not, the 
message is returned to the source terminal 
via the Routing subroutine. 


The subtask tests to determine if the 
line for this terminal is active. If it is 
not active, the terminal table entry is 
changed starting with the sequence-in 
(IJLOTSIN) field. 


If the line is active, the sequence-in 
and sequence-out fields in the entry are 
not changed. The entry is changed starting 
with the status field (IJLOTSTA) and the 
data field of the operator control message 
is truncated accordingly. 
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The information from the data field in 
the buffer is then packed into a work area, 
and the work area is moved into the 
terminal table entry. The subtask exits to 
Qdispatch. 


Upon reentry, the subroutine performs 
checking procedures, then returns to the 
macro generated code to branch to the 
ENDRCV delimiter macro instruction. 


COPYC Operation Subroutine: An audio 
Switch is set on to allow SUB1 to scan the 


audio line table. Then a branch is made to 
SUB1, which returns the address of the 
terminal or audio line entry specified. 

For a terminal entry, a test is made to 
make sure that the entry is for a terminal. 
If it is not, exit is made to the Routing 
subroutine. 


The address of the LCB or ALCB is 
obtained and the buffer is posted to a 
special QCB (COPYCLR) to enter the COPYCLR 
subtask at COPYCLRt6 in disabled state. 


The threshold line error counters are 
added to the cumulative line error 
counters. The cumulative counters are 
converted and formatted into the work area. 
A branch is made to UNPAK to unpack and 
translate the work area into the buffer. 
The threshold counters are cleared and exit 
is made to Qdispatch. 


Upon return, the subroutine branches to 
the Routing subroutine to return the buffer 
to the caller. 


COPYT Operation Subroutine: The subroutine 
branches to SUB1, which returns to the 


COPYT Operation subroutine the address of 
the terminal table entry for the terminal 
specified in the operator control message 
and the number of bytes in the kuffer 
following the termname operand. 


The COPYT Operation subroutine tests to 
determine if the length remaining in the 
buffer is enough to contain the information 
to be placed in it from the terminal table. 
If there is enough length, the subroutine 
branches to UNPAK to insert the terminal 
table entry into the buffer starting with 
the IJLQTSIN field. If there is not enough 
length, the subroutine sets flags to 
indicate to UNPAK to truncate the entry at 
the low-order end and to insert the amount 
of the entry that will fit. 


On return, the subroutine branches to 


the Routing subroutine to send the message 
back to the source terminal. 
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INTERCPT Operation Subroutine: The 
subroutine tests the parameter list to 


determine if the INTRCPT=YES operand was 
Specified in the OPCTL macro instruction. 
If it was not, the message is returned to 
the source terminal via the Routing 
subroutine. 


The subroutine then branches to SUB1 to 
obtain the address of the terminal table 
entry specified in the operator control 
message. It tests to determine if the 
entry iS a terminal entry. If not, the 
message is returned to the source terminal 
Via the Routing subroutine. 


If it is a terminal entry, the send bit 
in the IJLOTSTA field is turned off, and 
the subroutine returns to the macro 
generated code to branch to the ENDRCV 
delimiter macro instruction. 


INTREL Operation Subroutine: The 
subroutine turns on a switch (SW1) to 


indicate that the entry is from INTREL, and 
branches directly to STOPLN. Processing 
proceeds as described in STOPLN Operation 
Subroutine up to entry into SUBTASK1. 


On entry into SUBTASK1, the LCB is 
deactivated by insertion of X*"00" into the 
first byte of the LCB. A test is then made 
to determine if entry is from INTREL. If 
not, processing continues as described 
under STOPLN. Otherwise, the subtask 
branches to SUBTASK2. 


At SUBTASK2, the LCB is removed from the 
Ready Queue, and the switch representing 
entry from INTREL (SW1) is cleared. 


The buffer is modified to cause it to 
appear to the system as an LCB. The 
subtask prepares this pseudo-LcCB for 
insertion into the time queue with a 
two-minute delay. The status field of the 
LCB (LSTA) is changed to prevent the LCB 
from being started while the pseudo-LCB is 
in the Time Delay routine. 


In the Time Delay routine, the 
pseudo-LCB is recognized as coming from 
INTREL. A branch is made to the QOTAM Post 
routine to post the pseudo-LCB to itself to 
activate the next subtask on the STCB chain 
of the pseudo-LCB, causing entry into 
STCB2. 


At STCB2, a branch is made to the QTAM 
Post routine to post the real LCB to 
itself. At this time, the system also 
dispatches the pseudo-LCB, which is now 
treated as a buffer again, to the Available 
Buffer queue. 


After the line has been stopped and 
entry has been made into TRYEXIT, another 
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STARTARU Operation Subroutine: 


test is made to determine if entry is from 
INTREL. If yes, the switch indicating 
entry from INTREL (SW1) is cleared and the 
INTREL Switch in the LCB (in field LDFG) is 
set. A test is made to determine if the 
LCB has been deactivated. If not, exit is 
made to Qdispatch. Otherwise, a branch is 
taken back into SUBTASK2 at the point where 
the buffer is modified to appear to the 
System as an LCB (BUILD2). 


Entry into the INTREL subroutine may be 
from the Operator Awareness routine when it 
posts the buffer to a special QCB 
(IJLQOC70) associated with a special STCB 
(IJLQO0C80). (Both are located in the 
Operator Control module.) The subtask 
activated tests to determine if the LCB is 
active. If it is not, a branch is taken 
into SUBTASK2 at the point where the buffer 
is modified to appear to the system as an 
LCB (BUILD2). If the LCB is active, the 
Switch indicating entry from INTREL (SW1) 
is set, and a branch is taken to the STOP2 
subtask at the point where the combined 
QCB-STCB is generated in the buffer 
(GENSTCB). 


RFELEASEM Operation Subroutine: The 
subroutine tests to determine if 


INTRCPT=YES was specified in the OPCTL 
macro instruction. If it was not, the 
message is returned to the source terminal 
via the Routing subroutine. 


If the operand was so specified, the 
subroutine branches to SUB1 to get the 
address of the terminal table entry 
specified in the operator control message. 
Upon return, it tests to determine if the 
terminal is in intercept mode. If it is 
not, the subroutine returns to the macro 
generated code to branch to the ENDRCV 
delimiter macro instruction. 


If the terminal is in intercept mode, 
the subroutine obtains from the parameter 
list the offset to the intercept optional 
field in the terminal table entry, and 
compares the current disk address in the 
OCB with the disk address saved there. If 
they are not equal, the disk address in the 
optional field replaces the current disk 
address. 


The status of the terminal is then 
returned to active mode and the subroutine 
returns to the macro generated code to 
branch to the ENDRCV delimiter macro 
instruction. 


An audio 
Switch is set on to allow SUB1 to scan the 
audio line table. Then, a branch is made 
to SUB1, which returns the address of the 
audio line table entry specified in the 


operator control message. The address of 
the DTF line group is obtained and a test 
is made to determine if the DTF table has 
been opened. If not, the message is 
returned to the source terminal via the 
Routing subroutine. 


If ALL is specified in the operator 
control message, the address of the first 
ALCB in the line group is accessed. If the 
relative line number is specified, a test 
is made to check if this relative line 
number is valid. If not, the message is 
returned to the source terminal via the 
Routing subroutine. If yes, the address of 
the corresponding ALCB is accessed. 


When the ALCB stop flag is off, the line 
is already active and the line processing 
is completed. 


When the ALCB stop flag is on, but the 
line is not effectively stopped, the stop 
flag is reset and the line processing is 
completed. When the ALCB stop flag is on 
and the line is effectively stopped, an 
EXCP (SVC 0) is issued to restart the audio 
line. If ALL has been specified, this 
restart procedure is made for each line. 

In any case, return is made to the macro 
generated to branch to the ENDRCV delimiter 
macro instruction. 


STARTLN Operation Subroutine: The 
subroutine branches to SUB1, which returns 


to the STARTLN Operation subroutine the 
address of the terminal table entry 
specified in the operator control message 
and the number of bytes in the buffer 
following the termname operand. The 
subroutine then branches to SUB2, which 
translates the entry into EBCDIC in the 
low-order bytes of the buffer. 


The subroutine tests the QCB for the 
terminal table entry to make sure that the 
entry is for a terminal. If it is not, the 
message is returned to the source terminal 
via the Routing subroutine. 


The subroutine tests to determine if ALL 
is specified in the operator control 
message. If it is, the subroutine exits to 
the Change Line routine at the "start all" 
entry point. If it is not, entry is at the 
"start single line" entry point. 


The Change Line routine returns an error 
code to the STARTLN Operation subroutine in 
register 15. The subroutine tests this 
register for a code of 0, which indicates 
that no errors occurred. If the register 
does not contain 0, the message is returned 
to the source terminal via the Routing 
Subroutine. If the code is 0, no errors 
occurred, and return is made to the macro 
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generated code to branch to the ENDRCV 
delimiter macro instruction. 


STOPARU Operation Subroutine: An audio 


Switch is set on to allow SUB1 to scan the 
audio line table. Then, a branch is made 
to SUB1, which returns the address of the 
audio line table entry specified in the 
operator control message. The address of 
the DTF line group is obtained and a test 
is made to determine if the DTF table has 
been opened. If not, the message is 
returned to the source terminal via the 
Routing subroutine. 


If ALL is specified in the operator 
control message, the address of the first 
ALCB in the line group is accessed. If the 
relative line number is specified, a test 
is made to check if this relative line 
number is valid. If not, the message is 
returned to the source terminal via the 
Routing subroutine. If yes, the address of 
the corresponding ALCB is accessed. 


The ALCB stop flag is set on for the 
specified line or for each line in the line 
group if ALL has been specified, and return 
is made to the macro generated code to 
branch to the ENDRCV delimiter macro 
instruction. 


STOPLN Operation Subroutine: The 


subroutine branches to SUB1, which returns 
to the STOPLN Operation subroutine the 
address of the terminal table entry for the 
terminal specified in the operator control 
message and the number of bytes in the 
buffer following the termname operand. The 
subroutine then branches to SUB2, which 
translates the entry into EBCDIC in the 
low-order bytes of the buffer. 


A test is made to determine if at least 
22 bytes past the buffer prefix are 
available for use in the buffer. If not, 
the message is returned to the source 
terminal via the Routing subroutine. 


A test is made to determine if all lines 
are to be stooped in the line group that 
includes the line on which the operator 
control terminal is located. If so, the 
message is returned to the source terminal 
via the Routing subroutine. 


A test is made to determine if the DTF 
table containing the line to be stopped has 
been opened. If not, the message is 
returned to the source terminal via the 
Routing subroutine. 

The buffer size is extended, into the 
buffer prefix, to 56 bytes. 


A test is made to determine if the 
subroutine was entered via an INTREL 
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operator control message. If so, a branch 
is made to SUBTASK2 (described in INTREL 


Operation Subroutine). 


A test is made to determine if ALL is 
specified in the operator control message. 
If so, parameters are set up for the number 
of LCBs in the line group. 


The subroutine then issues a QPOST to 
post a special QCB (STOP1QCR) to itself. 
Entry into the STOP1 subtask is in 
Supervisor state. 


The STOP1 subtask changes a branching 
address in the Implementation module at 
IJLOIP25. This change causes the Post Send 
or the Post Receive routine (whichever is 
to gain control) to the exit to the 
Operator Awareness routine rather than to 
the Buffer Recali/Cleanup routine. 


The STOP1 subtask tests the status field 
in the LCB (IJLOLSTA) for the line that is 
to be stopped. If the line is not active, 
SUBTASK1 branches to TRYEXIT. (Action 
taken at TRYEXIT is discussed later in this 
section. ) 


The STOP1 subtask tests to determine if 
an operator control STOPLN procedure is 
pending by examining the first STCB in the ee 
STCB chain of the LCB. If it is the STOPLN 
STCB (STOP2), a branch is made to TRYEXIT. 


If the line is active, tests are made to 
determine if it is a switched line. If so, 
and if it is not actively transmitting, the 
subtask issues a HALT I/O to stop the 
Enable command for the line. 


If a Read Initial channel program is 
initiated on a WTTA line, a test is made to 
determine whether data is being received 
over that line. If not, the subtask issues 
a HALT I/O to stop the Prepare command for 
the WTTA line. 


A test is made to determine whether this 
is the first time this subtask has been 
reentered to stop other lines in a line 
group. If this is a reentry, the subtask 
branches to STOP2. 


The STOP1 subtask loads the address of 
another special QCB (STOP2QCB) into the 
destination field of the buffer, then 
branches to Qdispatch. Control returns to 
the macro generated code. 


The STOP2 subtask is activated when the 
Cleanup routine posts the buffer to the 
destination queue. Because the STOP2 QCB 
was inserted in the destination field of a 
the buffer, the buffer is passed to STOP2 \ 
instead. 








The STOP2 subtask generates in the 
buffer a combined QCB-STCB and coding to 
branch to SUBTASK1. This combined QCB-STCB 
is inserted as the first STCB in the STCB 
chain of the LCB for the line that is to be 
stopped. 


A test is made to determine if entry was 
from INTREL. If not, exit is made to 
Qdispatch. If entry was from INTREL, the 
Switch representing entry from INTREL (SW1) 
is cleared, the INTREL switch in the LCB 
(in field LDFG) is set, and exit is made to 
Qdispatch. 


When activity ceases on the line, entry 
is made to the next subtask on the LCB STCB 
chain, which is now the combined QCB-STCB 
set up in the buffer. The coding in the 
buffer branches tc SUBTASK1. 


SUBTASK1 deactivates the LCB by 
inserting X‘'0O0O* in the first byte of the 
LCB. 


A test is made to determine if entry is 
from INTREL. If so, the subtask branches 
to SUBTASK2. 


The next STCB from the STCB chain of the 
LCB iS examined to determine if it isa 
full STCB. If it is not, the LCB is 
removed from the Ready Queue, thus stopping 
the line. 


If there are other lines to be stopped, 
the subtask branches to TRYEXIT. 
Otherwise, exit is made to the QTAM Post 
routine to post the buffer to the Available 
Buffer queue. 


At TRYEXIT, a test is made to determine 
if there are more lines to be stopped. If 
so, the next LCB in the DTF table for the 
line group iS accessed, and return is made 
to the STOP1 subtask at the point where the 
line is examined to determine if it is 
active. 


If there are no more lines to be 
stopped, a test is made to determine if 
SUBTASK1 has been executed. If it has, 
then the buffer has already been posted to 
the Available Buffer queue, and exit is 
made to Qdisvatch. If SUBTASK1 has never 
been executed, this subtask exits to the 
QTAM Post routine to post the buffer to the 
Available Buffer queue. 


SWITCH Operation Subroutine: The parameter 
list generated by the OPCTL macro 


instruction includes a pointer to the 
terminal table entry for the operator 
control terminal, and (if specified in the 
OPCTL macro instruction) a pointer to the 
terminal table entry for the alternate 
operator control terminal. The SWITCH 
Operation subroutine reverses these two 


addresses in the parameter list, then 
returns to the macro generated code to 
branch to the ENDRCV delimiter macro 
instruction. 


If an alternate operator control 
terminal has not been specified, the 
message is returned to the source terminal 
via the Routing subroutine. © 


Common Operator Control Subroutines: 


SUB1. The subroutine branches to the Scan 
Header routine to get the next field in the 
message (termname operand). Upon return, 
it branches to the Lookup Terminal Table 
Entry routine to determine if the termname 
operand is valid. If not and if the audio 
Switch is off, the message is returned to 
the source terminal via the Routing 
subroutine. If not and if the audio switch 
is on, the audio line table is scanned to 
search a line table entry corresponding to 
the linename operand. If such a line entry 
is not found, the message is returned to 
the source terminal via the Routing 
subroutine. If the line entry is found, 
return is made to the calling routine. 


For a terminal entry, the subroutine 
then calculates the number of bytes in the 
buffer following the termname operand. 
Passing these parameters, return is made to 
the calling subroutine. 


SUB2. The subroutine gets the QCB for the 
terminal table entry specified, and tests 
to make sure that it is an entry for a 
terminal. If it is not, the message is 
returned to the source terminal via the 
Routing subroutine. 





Otherwise, the relative line number and 
the address of the DTF table are saved. 
The scan pointer is moved past any 
delimiting blanks in the buffer, and return 
is made to the calling routine. 


UNPAK. The subroutine unpacks and 
translates into valid EBCDIC the terminal 
table entry starting at the IJLQOTSIN field 
into the remaining bytes of the buffer. If 
the remaining bytes cannot contain the 
terminal table entry, its low-order end is 
truncated and the data that can fit is 
inserted. Return is made to the calling 
subroutine. 


Routing Subroutine. The subroutine moves 
the source identifier field (BSTO) to the 
destination identifier field (BDTO) in the 
header prefix. The address of the QCB for 
the source terminal is placed in the LCB 
and return is made to the macro generated 
code to branch to the ENDRCV delimiter 
macro instruction. 
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External Routines Used: 

Lookup Terminal Takle Entry (Module IJLQLK) 
Operator Awareness (Module IJLQOA) 

Scan Header (Module IJLQSH) 

Change Line (Module IJLQCL) 


Time Delay (in Implementation module) 


POLLING LIMIT CONTROL ROUTINE 


Module Name: IJLQPL (Chart PL) 

Entry Point: Expansion of the POLLIMIT 
macro instruction generates a BALR to this 
routine at IJLQPL uSing register 15 as the 
branch address register and register 14 as 
the return register. Bits 24-31 of 
parameter register 1 contain the specified 
polling limit. 


Function: Limits the number of messages to 
be accepted from a nonswitched terminal 
during one polling pass. If the polling 
pointer is not equal to the terminal entry 
for the current message or is at the end of 
the polling list, return is to the next LPS 
instruction. Otherwise, the current poll 
count (contained in the LMCT field of the 
LCB) is compared to the limit specified. 

If the count, incremented by one, is less 
than the limit, then return is to the next 
LPS instruction. If the count, incremented 
by one, exceeds or is equal to the limit, 
the polling pointer is set to the next 
terminal (in the polling list for the line) 
before returning to the next LPS 
instruction. 


External Routines Used: None 


PAUSE ROUTINE 


Module Name: IJLQPZ (Chart PZ) 

Entry Point: Expansion of the PAUSE macro 
instruction generates linkage to this 
routine at IJLQOPZ, using register 15 as the 
entry register and register 14 as the 
return register. Register 14 also serves 
aS a parameter list register. The 
parameter list consists of three items: 


1. The control character which causes 
insertion of idle (or other) 
characters. 

2. The number of idle (or other) 
characters to be inserted. 
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3. The hexadecimal configuration of the 
idle (or other) character(s) to be 
inserted. 


Function: Causes the specified number of 
idle (or other) characters to be inserted 
in an outgoing message segment each time 
the specified control character is 
encountered in the segment. 


The address of the first byte to be 
scanned for the special control character 
is computed for a header or text segment. 
The address of the previous BRB/CCW in the 
BRB-ring formed for sending this message is 
obtained from the LCCW field of the LCB. 

If the previous BRB/CCW is a Pause BRB/CCNW, 
the number of Pause BRB/CCWs remaining in 
the Additional-CCW queue is obtained from 
the location labeled COUNT. Otherwise, the 
number of Pause BRB/CCWs is obtained from 
expansion of the BUFFER macro (location 
IJLQBFRZ+2). The buffer is then scanned 
for the specified control character. 


If the character does not appear in the 
buffer, return is made to the next LPS 
instruction. If the character is found, 
the number of remaining Pause BRB/CCWs is 
decremented by one and stored in location 
COUNT. (If the count is zero, return is 
made to the next LPS instruction without 
further action. Insufficient Pause 
BRB/CCWs were specified in the BUFFER macro 
instruction, and no idle characters are 
transmitted.) The routine then loads the 
address of the Additional- CCW QCB into 
register 0 and links to the LPS Control 
routine at IJLOIP21. 


The LPS Control routine issues a QWAIT 
(Svc 30) to request a Pause BRB/CCW from 
the element chain of the Additional- CCW 
queue. When the request is satisfied, 
control is returned to the Pause routine 
with the address of the Pause BRB/CCW in 
register 1. 


The Pause BRB/CCW is a block of 24 bytes 
(for 3 CCWs) and is initialized and 
inserted into the BRB ring in the following 
manner (Figures 3 and 4 illustrate the BRB 
ring and buffer before and after insertion 
of the Pause BRB/CCW): The TIC address in 
the previous BRB/CCW is inserted into the 
third CCW of the Pause BRB/CCW and is 
overlaid by the address of the Pause 
BRB/CCW. The data address from the 
previous next BRB/CCW is placed into the 
first Pause CCW so that this CCW writes all 
message data preceding the control 
character and the control character itself. 


The address of the data character 
following the specified control character 
is placed into the previous "next BRB/CCW." 
The counts for both data fields are 
computed (count 1 and count 2 in Figure 4) 


— 








and placed in the appropriate CCW"s. The 
second Pause CCW is then initialized with 
the address and count of the idle (or 
other) characters to be transmitted. The 
final step is to place the address of the 
Additional CCW queue into the third Pause 
CcW; this is used for releasing the Pause 
BRB/CCW to the Additional-CCW queue after 
the segment has been transmitted. 


The routine then branches back to resume 
scanning the remainder of the buffer for 
the specified control character. If it is 
encountered again, the preceding procedure 
is repeated. This process continues until 
the entire buffer has been scanned or until 
no further Pause BRB/CCWs are available. 
Return is made to the next LPS instruction. 


External Routines Used: LPS Control 
(IJLQIP20 in Module IJLQIP) 


ROUTE MESSAGE ROUTINE 


Module Name: IJLORG (Chart RG) 
Entry Point: Expansion of the Route macro 


instruction generates a BALR to the routine 
at IJLORG, uSing register 15 as the kLranch 


Count 


address register and register 14 as the 
return register. Register 14 serves also 
as a parameter list register. The 
parameter list passed to the routine 
consists of one item: a halfword 
containing in binary, either: 


1. the maximum size of each destination 
code in incoming message headers; or 


2. all ones, indicating that the 
destination code fields are of 
variable length (the end of the field 
is indicated by a blank). 


Function: Links to the Scan Header routine 
to obtain the destination code in the 
incoming message header; then branches to 
the Lookup Terminal Table Entry routine, 
which looks up the destination code in the 
terminal table and places the relative 
address in the BDTO field of the incoming 
header prefix. Return to the next LPS 
instruction is made by the Lookup routine, 
rather than the Route Message routine. 


External Routines Used: 
Scan Header (Module IJLQOSH) 


Lookup Terminal Table Entry (Module IJLQLK) 


—— a4!“ 


Specified Control Character 


Write 


TIC Address 


TIC 
Command 


Previous BRB/CCW in Ring 


Command 


Flags 


Data Address 


Next BRB/CCW 


Figure 3. BRB Ring Before Insertion of Pause BRB/CCW 
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Figure 4. 


REROUTE MESSAGE ROUTINE 


Module Name: IJLQRR (Chart RR) 

Entry Point: Expansion of the REROUTE 
macro instruction generates a BALR to the 
routine at IJLQRR, using register 15 as the 
branch address register and register 14 as 
the return register. Register 14 also 
serves aS a parameter list register. The 
parameter list passed to the routine 
consists of the address of the error mask 
in hexadecimal notation. In parameter 
register 2 is the address of a field 
containing the code of the alternate 
destination. 


Function: Causes a message to be sent to 
an alternate destination when any of the 
error conditions specified by the error 
mask is indicated in the error-halfword, or 
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BRB Ring After Insertion of Pause BRB/CCW 


when the error mask is zero. If the error 
mask is not zero, and none of the error 
conditions specified by the mask are 
indicated in the error-halfword, return is 
made to the next LPS instruction. 
Otherwise, linkage is made to the Recall 
routine (in module IJLQIP), which obtains 
the header. Upon return, the routine 
branches to the Lookup Terminal Table Entry 
routine, which looks up the terminal table 
entry for the alternate destination and 
places its relative address in the BDTO 
field of the incoming header prefix. 
Return to the next LPS instruction is made 
by the Lookup routine. 


External Routines Used: 


Recall (IJLQIP22 in Module IJLOIP) 


we aie. 


Lookup Terminal Table Entry (Module IJLQLK) 











SCAN HEADER ROUTINE 


Module Name: IJLCSH (Chart SH) 


Entry Point: This routine is entered via a 
BALR from the IJLQOMP, IJLOSI, IJLOSK, 
IJLOMM, IJLORG, IJLQOSR, and IJLOMT modules; 
register 15 is the branch address register 
and register 3 is the return register. The 
address of a single-item parameter list is 
passed to the routine in register 14. The 
parameter list contains the field length or 
the variable-field-length indicator. Upon 
entry, the scan pointer register (register 
5) contains the address of either the last 
Character of the last header field scanned, 
or the first blank character following the 
field. 


Function: Obtains one or more nonblank 
characters from a fixed or variable-length 
header field and places them in a work 
area, the address of which is returned in 
register 2 to the calling routine. 


The Scan Header routine moves the scan 
pointer register one position at a time, 
and places any nonblank header character 
found into the work area. This operation 
is repeated until the end of the field is 
reached or the work area is filled (work 
area Size iS eight bytes). 


If the field to be scanned is 
fixed-length, its size is provided to the 
routine in a parameter list; the routine 
places into the work area the number of 
characters specified. During scanning, any 
blank characters encountered are passed 
over. They are not placed in the work area 
and they are not included in the count of 
characters maintained by the routine. 


If the field to be scanned is 
variable-length, an indicator (2X'FF*") is 
passed to the routine in the parameter 
list. The Scan Header routine scans to the 
first nonblank character and then places it 
and all succeeding nonblank characters into 
the work area. The scan is delimited when 
either: 


1. the first blank character is 
encountered, or 


2. the eighth nonklank character is moved 
into the work area. 


During any scan operation if the end of 
the segment is reached before the scan is 
completed, the scan is terminated and the 
"incomplete header" bit (bit 5) is set in 
the error-halfword. 


External Routines Used: None 


SEQUENCE NUMBER IN ROUTINE 


Module Name: IJLQSI (Chart ST) 

Entry Point: Expansion of the SEQIN macro 
instruction generates a BALR to the routine 
at IJLOSI, uSing register 15 as the branch 
address register and register 14 as the 
return register. Register 14 also serves 
aS a parameter list register. The 
parameter list passed to the routine 
consists of one item: the number of 
character positions for the input-message 
sequence number field. If this operand is 
omitted, a hexadecimal "FF" indicates a 
variable-length field. 


Function: The routine links to the Scan 
routine to obtain the sequence number from 
the header. If the number is in proper 
sequence, it is converted to binary 
notation and put into the BNIN (sequence 
number in) field of the header prefix. If 
the number is not in sequence according to 
the TSIN field in the terminal table entry, 
the sequence error bit is set accordingly 
in the UCB. 


If the sequence number is too low, the 
routine sets the “too low" bit (bit 3) in 
the LEHW (error-halfword) field of the LCB 
and return is to the next LPS instruction. 
If the sequence number is too high, the 
"too high" bit (bit 2) is set in the LEHW 
field of the LCB, and return is to the next 
LPS instruction. When either error 
condition occurs, the sequence-in field in 
the terminal table entry remains unchanged. 
If the number is in correct sequence, the 
expected sequence number from the terminal 
table is stored in the LBCT field of the 
LCB. The number in the sequence number 
field in the terminal table entry is 
incremented by one for the next message 
before returning to the next LPS 
instruction. 

External Routines Used: Scan Header 
(Module IJLQSH) 


SKIP CHARACTER SET ROUTINE 


Module Name: IJLOSK (Chart SK) 

Entry Point: Expansion of the SKIP macro 
instruction specifying a particular 
sequence Of characters to be skipped 
generates a BALR to the routine at IJLQOSK, 
uSing register 15 as the branch address 
register and register 14 as the return 
register. Register 14 serves also as a 
parameter list register. The parameter 
list passed to the routine consists of: 
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1. a halfword containing the length of 
the character sequence to be found, 
and 


2. a character constant containing the 
characters to be skipped. 


Function: Advances the scan pointer 
(contained in register 5) from its current 
position past all header characters up to 
and including a specified character 
sequence. At the completion of the 
operation, the scan pointer points to the 
last character in the specified sequence. 
Incrementing the scan pointer causes all 
characters bypassed to be ignored during 
header processing. If the end of the 
segment is reached before the specified 
sequence is found, the operation is 
terminated and the “incomplete header" bit 
(bit 5) is set in the error halfword for 
the line. 

External Routines Used: Scan Header 
(Module IJLQSH) 


SEQUENCE OUT ROUTINE 


Module Name: IJLQSO (Chart SO) 

Entry Point: Expansion of the SEQOUT macro 
instruction generates a BALR to the routine 
at IJLQSO, using register 15 as the branch 
address register and register 14 as the 
return register. Register 14 also serves 
aS a parameter list register. The 
parameter list passed to the routine 
consists of one item: the number of 
character positions for the output sequence 
number. 


Function: The routine links to the Expand 
Header routine, which “expands™ the header 
by creating a new field whose high-order 
byte is the location pointed to by the scan 
pointer. The binary sequence number is 
obtained from the sequence number out 
(BNOT) field in the header prefix and 
converted to decimal form. The sequence 
number is unpacked and inserted into the 
new header field. Return is to the next 
LPS instruction. 


External Routine Used: 
(Module IJLQEX) 


Expand Header 


SOURCE TERMINAL VERIFICATION ROUTINE 


Module Name: IJLCSR (Chart SR) 


Entry Point: Expansion of the SOURCE macro 
instruction generates a BALR to the routine 
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at IJLOSR, uSing register 15 as the branch 
address register and register 14 as the 
return register. Register 14 also serves 
as a parameter list register. The 
parameter list passed to the routine 
consists of one item: a halfword 
containing a source code field-length 
indicator. 


Function: Determines the validity of the 
source terminal code field of an incoming 
message header. 


Linkage is made to the Scan Header 
routine which returns in register 2 the 
address of an area containing the source 
terminal code found in the header. 
Verification of the source code is made as 
follows: 


1. If the message originated froma 
nonswitched terminal, the contents of 
the source code field are compared 
with the name of the originating 
terminal (as the name appears in the 
terminal table entry). If the 
characters match, the source code is 
considered valid. If they do not 
match, the “invalid source code" bit 
(bit 6) is set in the error-halfword 
for the line. 


2. If the message originated froma 
switched or autopolled terminal the 
contents of the source code field are 
compared with each terminal entry name 
in the terminal table, in succession, 
until a match is found. If the source 
code matches any of the entry names in 
the terminal table, it is considered 
valid. If no match is found among any 
of the entry names in the table, the 
code is considered invalid and the 
"invalid source code" bit is set to 
one. If the source code is valid, the 
routine places its relative address 
(within the terminal table) in the 
source key (BSTO) field of the header 
prefix in the buffer whose message 
segment is being operated upon. The 
relative address is also placed in the 
LTTD field of the LCB. 


In all cases, control returns to the 
next instruction in the LPS. 


External Routines Used: Scan Header 


(Module IJLQOSH) 
SKIP-ON-COUNT ROUTINE 


Module Name: IJLQOST (Chart ST) 


~ 











Entry Point: The expansion of a SKIP macro 
instruction specifying a number of 
characters to be skipped generates a BALR 
to the routine at IJLQST, using register 15 
as the branch address register and register 
14 as the return register. Register 14 
also serves aS a parameter list register. 
The parameter list passed to the routine 
consists of one item: a halfword 
containing the number of characters to be 
skipped. 


Function: Advances the scan pointer 
(contained in register 5) from its current 
position past a specified number of 
nonblank header characters. The pointer 
then points to the last nonblank character 
needed to complete the count. Incrementing 
of the scan pointer causes all characters 
bypassed to be ignored during header 
processing. If the end of the segment is 
reached before the SKIP operation is 
completed, the operation is terminated and 
the “incomplete header™ bit (bit 5) is set 
in the error-halfword for the line. 


External Routines Used: None 


TRANSLATE ROUTINE 


Module Name: IJLQTR (Chart TR) 

Entry Point: Expansion of the TRANS macro 
instruction generates a BALR to the routine 
at IJLQTR, uSing register 15 as the branch 
address register and register 14 as the 
return register. The parameter register 1 
contains the address of the translation 
code table named in the operand of the 
macro. 


Function: Translates message segments from 
one code to another. The number of 
characters to be translated is computed by 
subtracting the address of the first byte 


External Routines Used: 


to be translated from the address of the 
end of the segment. If the number is 
non-negative, the message data is 
translated using the table specified in the 
macro. Return is to the next LPS 
instruction. 


None 


TIME STAMP ROUTINE 


Module Name: IJLOQOTS (Chart TS) 

Entry Point: Expansion of the TIMESTMP 
macro instruction generates a BALR to the 
routine at IJLOTS, using register 15 as the 
branch address register and register 14 as 
the return register. Register 14 also 
serves aS a parameter list register. 
parameter list passed to the routine 
consists of one item: a halfword 
containing, in binary, the length of the 
time information field to be inserted in 
the message header. 


The 


Function: Obtains the current time in 
packed decimal format (via a GETIME macro), 
unpacks it, and inserts a specified portion 
of the time information in the message 
header. Prior to inserting the time, the 
routine links to the Expand Header routine, 
which "expands" the header by shifting to 
the left all message characters preceding 
the location in the header where the time 
information is to be inserted. The time is 
inserted in the field thus created. The 
maximum field size is nine characters in 
the format bhh.mm.ss, where b = blank, 

hh = hours, mm = minutes, and ss = seconds. 
Lesser field sizes have a Similar format, 
truncated from the right. 


External Routines Used: 
(Module IJLQEX) 


Expand Header 
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MESSAGE PROCESSING PROGRAM ROUTINES 


This section contains a detailed 
description of all the QTAM routines that 
Support a message processing program. 

These routines include the GET and PUT 
routines and the routines associated with 
the macro instructions that examine and 
modify the status of the telecormunications 
System. The routines discussed in this 
section have several characteristics in 
common: 


1. Each routine is linkage-edited into 
the message processing program due to 
a V-type address constant generated by 
the expansion of a QTAM macro 
instruction. 


2. Fach routine is entered for execution 
by linkage generated by the expansion 
of its associated macro instruction. 


3. Each routine saves and restores 
registers uSing standard register 
Saving techniques. 


All of the routines discussed, with the 
exception of the Close Message Control 
routine (CLOSEMC), provide error returns 
when an invalid condition is detected. 
Error codes are returned in register 15, 
right-adjusted. The codes for specific 
error conditions are contained in the 
discussions of the individual routines. 
Zeros are returned in register 15 when no 
error is detected. 


CHANGE LINE ROUTINE 


Module Name: IJLCCL (Chart CL) 


Entry Points: 


1. IJLQCL--from STOPLN macro expansion 
for a specified line. 


2. IJLOCL + 2--from STARTLN macro 
expansion for a specified line. 


3. IJLQCL + 4--from STOPLN macro 
expansion if ALL is specified. 


4“. IJLOCL + 6--from STARTLN macro 
expansion if ALL is specified. 


Upon entry, register 0 contains the address 
of the specified DIF table with the 
relative line numker in the high-order 
byte. It should be noted that entry to 
this routine is made only when the DTF 
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Locater routine was able to locate the 
specified DTF table. 


Function: Causes a specified line (or all 
lines) in the specified line group to be 
activated or deactivated, depending on 
whether a STARTLN or STOPLN macro has been 
issued. 


If either of the following errors is 
detected, no action is taken and return is 
made to the calling routine with an error 
code in register 15, right-adjusted: 


1. DTF table has not been opened (error 
code = X*01"); or 


2- Invalid relative line number (error 
code = X*08"). 


If no errors are detected, the LCB for the 
specified line (or the first LCB in the 
group if ALL) is accessed. 


If entry is for a STARTLN, and if the 
line is not already active, the line is 
activated as follows: The address of the 
LCB is loaded into the SVC parameter 
registers 0 and 1, and the line (LCB) is 
posted to itself via an SVC QPOST. Posting 
a line to itself is the standard technique 
used for activating (freeing) the line. 


If entry is for a STOPLN ona 
nonswitched and non-WTTA line, and if the 
line is not already inactive, the line is 
stopped as follows: the address of the LCB 
for the specified line is loaded into SVC 
parameter register 0 and an SVC QWAIT is 
issued. This causes the line to be placed 
in an inactive state. Note that for 
autopolled lines in read initial the 
wraparound polling list is broken before 
issuing the QWAIT. 


If the STOPLN is for a switched line or 
for a WITA line, a test is made to 
determine if the line is involved in active 
transmission (that is, the line has been 
assigned for a dial operation or is 
currently connected to a terminal). If it 
is, a special ECB representing a request 
for a Hait I/O operation is posted by a 
QPOST to the LPS queue. LPS control 
recognizes the element and issues a Halt 
I/O (Svc 27). If the line is not currently 
involved in active transmission, the SVC 27 
is not issued.. 


If ALL has been specified in the STOPLN 
or STARTLN macro, the applicable procedure 


\ 











is repeated for each line in the line 
group. Return is to the calling routine. 


External Routines Used: 
OPOST (SVC 31) 
QWAIT (SVC 30) 


HALT I/O (SVC 27) 


CHANGE POLLING LIST ROUTINE 


Module Name: IJLQCP (Chart CP) 

Entry Point: Expansion of the CHNGP macro 
instruction generates linkage to this 
routine at IJLQCP, using register 15 as the 
entry register and 14 as the return 
register. Upon entry, register 0 contains 
the address of the named DTF takle with the 
specified relative line number in its 
high-order byte; register 1 contains 
either: 


1. the address of the work area if the 
old list is to be replaced, or 


2. the address of a field containing the 
“change status" indicator if the list 
is to be activated or deactivated. 


It should be noted that entry is made to 
this routine only when the DTF Locater 
routine (Module IJLQFL) was able to locate 
the specified DTF table. 


Function: Replaces the current polling 
list with a new polling list, or changes 
the status of the polling list. 


If any of the following errors are 
detected, no movement of data occurs. 
Return is to the calling routine with an 
error indicator in register 15, 
right-adjusted: 


1. DTF table has not been opened (error 
code = X‘'01") 


2. Invalid relative line number (error 
code = X'08'*) 


3. Length of new polling list is not 
equal to that of the current list 
(error code = X‘'10"). 


The specified polling list is located as 
follows: The appropriate LCB is found by 
multiplying the relative line number by the 
Size of the LCBs in this line group and 
adding the result to the beginning address 
of the first LCB in the group. The LPOL 
field in this LCB contains the address of 
the desired polling list. 


Tf the polling list is to be replaced, 
the QMOVE OCB (IJLQOIP70 in module IJLOIP) 
is posted to itself (via an SVC QPOST). 
This causes the QMOVER routine to be 
activated for the cross-partition movement 
of the new polling list. Parameters passed 
to the QOMOVER routine are: 


1. register 3--length of the area to be 
moved; 


2. register 4--address of the current 
polling list being replaced; and 


3. register 5--address of the work area 
containing the new list. 


If just the status byte in the current 
polling list is to be changed, the 
following parameters are passed to the 
QMOVER routine: 


1. register 3--contains zeros to cause 
the QMOVER routine to change just the 
Status byte of the list; 


2. register 4--address of the current 
polling list; 


3. register 5--address of the area 
containing the change status 
indicator. 


After the SVC OPOST is satisfied, 
after the change has been completed, 
is made to the calling routine. 


1.@., 
return 


External Routine Used: 
QOMOVER (IJLOIP80 in Module IJLOIP) 


QPOST (Svc 31) 


CHANGE TERMINAL TABLE ENTRY ROUTINE 


Module Name: IJLQCT (Chart CT) 

Entry Point: Expansion of the CHNGT macro 
instruction generates a BALR to the routine 
at IJLQCT, using register 15 as the entry 
register and register 14 as the return 
register. Upon entry, parameter register 0 
contains the address of the work area; the 
address of an area containing the terminal 
name is passed in register 1. 


Function: Causes a current terminal table 
entry to be replaced with a new entry 
contained in the specified work area. 


The address of the QTAM Vector Table is 
obtained from the DOS Communication Region; 
the address of the terminal table (in the 
F1 partition) is obtained from the Vector 
Table. A search of the terminal table is 
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performed in an attempt to find the entry 
to be changed. The name specified in the 
Macro iS compared with the name in the TTID 
field of each entry until a match is found 
or the end of the terminal table is 
reached. 


If the name specified is not found, 
return is made with an error code of X'20' 
in register 15. If the name is found, the 
length of the new entry is compared with 
that of the old. If the lengths are 
unequal, an error indicator of X'10' is set 
in register 15 and return is made to the 
calling program. 


The LCB for the line to which the 
specified terminal is attached is accessed. 
If LSTA in the LCB is zero, the line is 
inactive so the entire old entry may be 
replaced. The QMOVE QCB (IJLQIP70) is 
posted to itself (via a QPOST). This 
causes the QMOVER routine (in module 
IJLQIP) to be entered for the 
cross-partition movement of the new entry. 
Parameters passed to the QMOVER routine 
are: 


1. register 3--length of the area to be 
moved; 


2. register 4--address of the terminal 
table entry being replaced; and 


3. register 5--address of the work area 
containing the new entry. 


If LSTA is not zero (the line is 
active), the sequence-number-in (TSIN) and 
sequence-number-out (TSOT) fields in the 
old entry must not be disturbed. Thus, the 
change is effected by two separate 
movements of data (via 2 QPOSTs) so as to 
skip over these fields. 


After the SVC QPOST is completed, return 
is made to the calling program. 
External Routines Used: QMOVER (IJLQIP80 
in module IJLQIP) 


CHECKPOINT REQUEST ROUTINE 


Module Name: IJLQCR (Chart CR) 

Entry Point: The expansion of the CKREQ 
Macro instruction generates a BALR to the 
Checkpoint Request module at IJLQCR. No 
parameters are passed. 


Function: The Checkpoint Request routine 
issues a QPOST to post a checkpoint request 
element to the checkpoint queue (located in 
the Checkpoint module). The routine then 
issues a QWAIT on the checkpoint request 
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Module Name: 


Entry Point: 


Function: 


user. 


queue (also located in the Checkpoint 


module). This QWAIT is satisfied when the ee 
Checkpoint module, after it has taken the 
checkpoint, issues a QPOST to post a Shs 


checkpoint request element to the 
checkpoint request queue. Upon normal 
return, the Checkpoint Request routine . 
passes to the message processing program, 
in register 15, a code of X'00*°* to indicate 
that no errors have occurred. 


If the user issues a CKREQO macro 
instruction when checkpointing has not been 
specified in the message control program, 
the routine returns an error code of X'O4?® 
in register 15. If the user issues a CKREQ 
macro instruction when the checkpoint 
interval method of checkpointing has been 
specified, the routine returns an error 
code of X‘'08" in register 15. 


External Routines Used: 


QPOST (Svc 31) 


QWAIT (Svc 30) 


COPY LINE ERROR COUNTERS ROUTINE 


IJLQODC (Chart CC) 


Expansion of the COPYC macro 
instruction generates a BALR to the Copy 
Line Error Counters routine at IJLQDC. 
Register 0 contains the address of the 
user's work area. Register 1 contains the 
address of the terminal or line name 
specified. Register 15 is the branch 
register, and register 14 is the return 
register. Register 14 also contains the 
address of an area containing the relative 
line number if a relative line number is 
specified by the user. If it is not 
specified, the area contains zeros. 


% 


Copies the line error counters 
for a line into a user-specified work area. 


The routine gets the address of the 
vector table and locates the QTAM portion 
of the vector table. From this, the 
routine finds the location of the terminal 
table and searches the terminal table for 
the entry for the terminal specified by the 
If a terminal entry is not found and 
if an audio line table is specified, its 
address is obtained from the vector table, 
and the routine searches for a line table 
entry corresponding to the line name 
specified. If no entry is found, the 
routine returns to the user's program, 
passing an error code of X‘20°, 
right-adjusted, in register 15. Ifa fe 
terminal entry is found, the routine a 
locates the QCB for the entry, and finds 








External Routines Used: 


inthe QCB the address of the DTF table for 
the line group in which the terminal is 
located. If the user has specified the 
relative line number, the routine uses it 
to locate the LCB for the particular line 
whose counters are to be copied. 
Otherwise, the routine uses the relative 
line number specified in the QCB. 


If a line entry is found, the routine 
locates the ALCB for the particular audio 
line whose counters are to be copied. 


The routine copies the threshold 
counters and the cumulative counters from 
the LCB or ALCB, adds them together, and 
places the total in the user-specified work 
area. The QOmover routine is entered via a 
QOPOST (SVC 31) two times, first to set the 
cumulative counters to the new total, then 
to set the threshold counters to 0. The 
routine then returns to the user's program 
with a code of X'00", right-adjusted, in 
register 15. 


External Routines Used: 
OQmover routine (IJLQIP80 in Module IJLOIP) 


QPOST (SVC 31) 


COPY TERMINAL TABLE ENTRY ROUTINE 


Module Name: IJLCDE (Chart DE) 

Entry Point: Expansion of the COPYT macro 
instruction generates a BALR to the routine 
at IJLQDE, using register 15 as the entry 
register and register 14 as the return 
register. Upon entry, register 0 contains 
the address of the work area into which the 
entry is to be copied and register 1 
contains the address of a location 
containing the entry name. 


Function: Moves a specified terminal table 
entry into a specified work area. 


The terminal table address (in the F1 
partition) is accessed through the DOS 
communication region and the QTAM Vector 
Table. A search of the terminal table is 
made to find the specified entry. If the 
specified entry is not found, return is 
made to the calling program with an error 
code of X*°20" in register 15. If the entry 
is found, the entire entry is moved to the 
specified work area. The length of the 
entry to be moved is found in the first 
byte (TSZE field) of the entry. Return is 
to the calling program. 


None. 


COPY POLLING LIST ROUTINE 


Module Name: IJLQDP (Chart DP) 

Entry Point: Expansion of the COPYP macro 
instruction generates linkage to the 
routine at IJLQDP, uSing register 15 as the 
entry register and register 14 as the 
return register. Register 1 contains the 
address of a work area into which the 
polling list is to be copied. The address 
of the DTF table for the line group is 
contained in the low-order 3 bytes of 
register 0. The relative line number of 
the line associated with the polling list 
is passed in the high-order byte of 
register 0. It should be noted that entry 
is made to this routine only when the DTF 
Locator routine (module IJLQOFL) has been 
able to locate the specified DTF table. 


Function: Moves a copy of the specified 
polling list into a specified work area. 


If either of the following errors in 
Specification is detected, return is made 
to the calling program with an error 
indicator in register 15, right-adjusted: 


1. DIF table not opened (error = "01'); 
Or 


2e invalid relative line number (error 
code = *08°). 


The specified polling list is located as 
follows: The appropriate LCB is found by 
multiplying the relative line number by the 
Size of the LCBs in this line group and 
adding the result to the beginning address 
of the first LCB. The LPOL field in this 
LCB contains the address of the desired 
polling list. The polling list is then 
moved into the specified work area and 
return is made to the calling routine. 


External Routines Used: None. 


COPY QUEUE CONTROL BLOCK (QCB) ROUTINE 


Module Name: IJLQDQ (Chart DQ) 

Entry Point: Expansion of the COPYO macro 
instruction generates linkage to this 
routine at IJLQDQ, using register 15 as the 
entry register and register 14 as the 
return register. Upon entry, register 0 
contains the address of the specified work 
area, and register 1 points to a field 
containing the name (character string) of a 
DASD terminal or process queue associated 
with the requested QCB. 
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Function: Moves a copy of the requested 
QCB into the specified work area. 


The address of the terminal table is 
accessed through the DOS communication 
region and the QTAM Vector Table. The 
specified terminal name is compared, 
succesSively, with the name in the TTID 
field of each terminal table entry until an 
equal compare or the end of the terminal 
table is reached. If the specified name is 
not found in the terminal table, return is 
made to the calling routine with an error 
indicator of X"20" in register 15, 
right-adjusted. 


The address of the requested QCB is 
obtained from the TQAD field in the 
specified terminal table entry. The QCB is 
then moved into the specified work area 
(the QCB for all DASD process or 
destination queues is 32 bytes in length). 
Return is made to the calling routine. 


External Routines Used: None. 


DTF LOCATOR ROUTINE 


Module Name: IJLCFL (Chart FL) 

Entry Point: Expansion of the STOPARU, 
STARTARU, STOPLN, STARTLN, COPYP, and CHNGP 
macro instructions generate linkage to this 
routine at IJLOFL, uSing register 15 as the 
entry register and 14 as the return address 
register. Upon entry, the address of the 
area containing the specified DIF name is 
supplied in register 1. 


Function: Finds the address of the DTF 
table corresponding to the DTF name 
(character string) specified in the macro. 
The logic module associated with the macro 
requires the DTF table address for proper 
execution. 


In operation, the routine obtains the 
address of the last QTAM DTF opened from 
the VECLDTF field of the QTAM Vector Table. 
Using this as a beginning address, it 
searches all QTAM DIF tables in an attempt 
to locate the one corresponding to the name 
specified. The name contained in the DNME 
field of the last DTF table is compared 
with the specified name. If they are 
unequal, the address of the previous DTF in 
the chain as created by the QTAM Open 
routine, is obtained from the DFLK field in 
the DIF and the search continues. When an 
equal compare is made, the address of the 
DTF table located is placed into register 1 
and return is made to the next instruction 
in the macro expansion. 
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If the specified DTF table is not found, 
or if it is not a DTF table for a line 
group file, return is made with an error 
code of X*'20° in register 15. The next 
instruction in the macro expansion tests 
for an error return in register 15. If no 
error is indicated, linkage is made to the 
appropriate logic module. If an error is 
indicated, return is made to the calling 
routine. 


External Routines Used: None 


GET AUDIO MESSAGE ROUTINE 


Module Name: IJLQOGA (Chart GA) 
Entry Points: This routine is entered at 
the following points: 


1. IJLQGAt+8 via linkage generated by the 
GET macro expansion. Upon entry, 
register 0 contains the address of the 
work area, and register 1 contains the 
address of the DTF table for an 
MS~process queue. 


2. IJLQGA20+14 from the QTAM Control 
Program. This entry is a special 
section of the GET Audio Message 
routine which runs in supervisor state 
to avoid cross-partition storage 
protection in turning on the GET bit 
in an ALCB (in the foreground-1 
partition). Upon entry into the GET 
audio subtask, the address of the 
high-priority GET audio element, which 
contains the address of the passed 
ALCB, iS in register 1. 


Function: Provides the next sequential 
audio message in a specified work area. 

The routine first removes the MS-process 
queue from the Ready Queue through a QWAIT 
(Svc 30) on the Ready Queue itself and then 
makes a test to determine whether an ALCB 
is in the process queue: 


1. If not, and if a user-written routine 
has been specified to handle this 
Situation (SYNCAD keyword operand), 
linkage is made to this routine. 


Exception: If CLOSEMC has been issued 
(master receive switch off), control 
transfers to the routine specified in 
the FLUSHAD keyword operand. 


2. If yes (or if no user-written routine 
was specified), the next ALCB is 
requested by issuing a QWAIT (SVC 30) 
on the process queue. (If there is no 
ALCB in the queue, control does not 





return until another ALCB arrives.) 
The address of the ALCB is returned to 
register 1. From the ALCB, the line 
table entry enables the address of the 
source line name to be obtained. 

Then, this line name is moved into the 
area specified in the LINAD keyword 
operand. 


If the work area is not large enough to 
contain the message received in the input 
buffer of the ALCR, and if a user-written 
routine has been specified in the OVAD 
keyword operand, linkage is made to this 
routine. On return from this routine, or 
if it has not been specified, the length of 
the input messages is reduced to the size 
of the work area. The remainder of the 
message, which cannot be placed in the work 
area, is ignored. 


The length of the message is stored into 
the GET/PUT prefix (first two bytes) of the 
work area and, according to this length, 
the message data is moved from the ALCB 
into the work area. 


The address of the ALCB is stored into 
the high priority GET audio element which 
is posted (Svc 31) to the special GET audio 
queue. On activation of the GET audio 
subtask, the GET bit is set on in the ALCB, 
and the control returns to the calling 


partition). Upon entry into the GET 
audio subtask, the address of the 
high-priority GET audio element, which 
contains the address of the passed 
ALCB, iS in register 1. 


Function: Provides the next sequential 
message in a specified work area. This 
work area is made up of two consecutive 
parts: the first part used to receive 
nonaudio messages, the second to receive 
audio messages. The lengths of these parts 
are specified in the SOWA and SOWARU 
keyword operands, respectively. 


The routine first removes the MS process 
queue from the Ready Queue through a QWAIT 
(Svc 30) on the Ready Queue itself and then 
tests to determine whether an element 
(buffer or ALCB) is in the process queue: 


1. If not, and if a user-written routine 
has been specified to handle this 
Situation (SYNCAD keyword operand), 
linkage is made to this routine. 


Exception: If CLOSEMC has been issued 
(master receive switch off), control 
is transferred to the routine 
specified via the FLUSHAD keyword 
operand. 


section of the GET Audio Message routine. 


7 


hoi 





Finally, return is made to the next 
instruction in the message processing 
program. 

External Routines Used: 
OPOST (SVC 31) 


QWAIT (SVC 30) 


GET NONAUDIO OR AUDIO MESSAGE ROUTINE 


Module Name: IJLQOGB (Charts GB and GC ) 
Entry Points: This routine is entered at 


the following points: 


1. IJLQGBt+8 via linkage generated by the 
GET macro expansion. Upon entry, 


register 0 contains the address of the 
work area, and register 1 contains the 


address of the DTF table for an MS 
process queue. 


Ze IJLQGB20+14 from the QOTAM Control 
Program. This entry is an audio 
section that runs in supervisor state 
to avoid cross-partition storage 
protection in turning on the GET bit 
in an ALCB (in the foreground-one 


2. If yes (or if no user-written routine 
was specified), a test is made to 
determine whether any message data 
remains in a buffer obtained froma 
previous GET. 


a. If not, and if the last processed 
element is not an ALCB, the 
previous buffer is released to the 
Return Buffer queue through an 
SVC 31 (QPOST), and the next 
element is requested through an 
Svc 30 (QWAIT) on the process 
queve. (If no element is in the 
queue, control does not return 
until another element arrives.) 
The address of the buffer is 
returned to register 1. At this 
point, the header disk pointer is 
saved for use by the next 
checkpoint. 


b. If yes, the QPOST/QWAIT sequence 
is bypassed, because the message 
data remaining in the buffer must 
be handled before releasing the 
buffer. The count and starting 
address of the remaining data are 
computed before continuing. 


The routine then tests to determine 


whether the next element to be processed is 
a buffer or an ALCB. 
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1. If it is a buffer, if this buffer 
contains the header, and if the source 
terminal displacement (BSTC in buffer 
prefix) is not zero, the source 
terminal name is moved into the area 
specified in the TRMAD keyword 
operand. (The source displacement is 
zero if the message is from another 
resSage processing program, or if the 
message arrived over a switched or 
autopolled line for which the SOURCE 
macro instruction was not included in 
the incoming LPS.) The user's switch 
specified in the SWITCH keyword 
operand is turned off. . 


The message data is moved from the 
buffer into the first part of the work 
area uSing the size of the data, or 
the size of the remainder of the work 
area (first part) if smaller. After 
this has been executed, a test for 
end-of-message is made. If 
end-of-message is not found, a waiting 
loop is entered to release (QPOST) the 
buffer and to wait (QWAIT) for the 
next. If found, the type and length 
of the message data moved are stored 
into the GET/PUT prefix. 


ca 


If the first part of the work area 
is not large enough to contain the 
entire message, and if a user-written 
routine has not been specified to 
handle this situation (OVAD keyword 
operand), the count of the message 
data remaining in the buffer is 
computed and stored before control 
returns to the calling routine. If a 
user-written routine has been 
specified, linkage is made to this 
routine. In either case, the 
remainder of the message is moved into 
the first part of the work area when 
the next GET is issued. 


2. If it is an ALCB, the address of the 
source line name is computed, and the 
line name is moved into the area 
Specified in the LINAD keyword 
operand. The user's switch specified 
in the SWITCH keyword operand is 
turned on. 


If the second part of the work area 
is not large enough to contain the 
message received in the input buffer 
of the ALCB, and if a user-written 
routine has been specified in the OVAD 
keyword operand, linkage is made to 
this routine. On return from this 
routine, or if it has not been 
specified, the length of the input 
message is reduced to the size of the 
second part of the work area. The 
remainder of the message, which cannot 
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be placed in the work area, is 
ignored. 


The length of the message is stored 
in the GET/PUT prefix (first two 
bytes) of the work area (second part) 
and, according to this length, the 
message data is moved from the ALCB 
into the work area (second part). 


The address of the ALCB is stored 
in the high-priority GET audio 
element, which is posted (SVC 31) to 
the special GET audio queue. On 
activation of the GET audio subtask, 
the GET bit is set on in the ALCB, and 
control returns to the calling section 
of this module. 


When a complete message is in the work 
area return is made to the next instruction 
in the message processing program. 


External Routines Used: 


QOPOST (Svc 31) 


QWAIT (Svc 30) 


GET RECORD OR AUDIO MESSAGE ROUTINE 


Module Name: IJLQGC (Charts GD and GE) 
Entry Points: This routine is entered at 
the following points: 


1. IJLQGC+8 via linkage generated by the 
GET macro expansion. Upon entry, 
register 0 contains the address of the 
work area, and register 1 contains the 
address of the DTF table for an MS 
process queue. 


2. IJLQGC20+14 from the QTAM Control 
Program. This entry is an audio 
section that runs in supervisor state 
to avoid cross-partition storage 
protection in turning on the GET bit 
in an ALCB (in the foreground-1 
partition). Upon entry into the GET 
audio subtask, the address of the 
high-priority GET audio element, which 
contains the address of the passed 
ALCB, is in register 1. 


Function: Provides the next sequential 
message record or audio message ina 
specified work area. This work area is 
made up of two consecutive parts: the 
first part used to receive message records, 
the second to receive audio messages. The 
length of these parts is specified in the 
SOWA and SOWARU keyword operands, 
respectively. 











The routine first removes the MS-process 
queue from the Ready Queue through a QWAIT 
(Svc 30) on the Ready Queue itself and then 
tests to determine whether an element 
(buffer or ALCB) is in the process queue: 


1. If not, and if a user-written routine 
has been specified to handle this 
Situation (SYNCAD keyword operand), 
linkage is made to this routine. 


Exception: If CLOSEMC has been issued 
to initiate a closedown procedure 
(master receive switch off), control 
is transferred to the routine 
specified via the FLUSHAD keyword 
operand. 


2. If yes (or if no user-written routine 
Specified), a test is made to 
determine whether part of a record 
remains in a buffer obtained from a 
previous GET. 


a. If not, and if the last processed 
element is not an ALCB, the 
previous buffer is released to the 
Return Buffer queue through an SVC 
31 (QPOST), and the next element 
is requested through an SVC 30 
(QWAIT) on the process queue. (If 
no element is in the queue, 
control does not return until 
another element arrives.) The 
address of the buffer is returned 
to register 1. At this point, the 
header disk pointer is saved for 
use by the next checkpoint. 


b. If yes, the QPOST/QWAIT sequence 
is bypassed, because the remaining 
data in the buffer must be handled 
before releasing the buffer. The 
count and starting address of the 
remaining data are computed before 
continuing. 


The routine then tests to determine 
whether the next element to be processed is 
a buffer or an ALCB. 


1. If it is a buffer, if this buffer 
contains the header, and if the source 
terminal displacement (BSTO in buffer 
prefix) is not zero, the source 
terminal name is moved into the area 
specified in the TRMAD keyword 
operand. (The source displacement is 
zero if the message is from another 
ressage processing program, or if the 
message arrived over a switched or 
autopolled line for which the SOURCE 
Macro instruction was not included in 
the incoming LPS.) The user's switch 
specified in the SWITCH keyword 
operand is turned off. 


The data in the buffer is moved 
into the first part of the work area, 
one byte at a time, until either: 


a. A new-line (NL) or EOB character 
is encountered in the buffer, or 


b. The first part of the work area is 
filled. If a NL or EOB character 
is found, it is moved into the work 
area along with any consecutive NLs 
or EOBs that immediately follow it. 
The type of message unit and the 
record length are placed in the 
GET/PUT prefix. 


If the first part of the work area 
is not large enough to contain the 
entire record, and if a user-written 
routine has not been specified to 
handle this situation (OVAD keyword 
operand), the count of the data not 
transferred is computed and stored for 
the next GET. If a user-written 
routine has been specified, linkage is 
made to this routine. In either case, 
the remaining data will be supplied on 
the next GET. 


If neither of the preceding 
conditions specified is encountered in 
the current buffer, an SVC 30 (QWAIT) 
is issued to request another buffer, 
and the above procedure is repeated. 


If it is an ALCB, the address of the 
source line name is computed, and the 
line name is moved into the area 
specified in the LINAD keyword 
Operand. The user's switch specified 
in the SWITCH keyword operand is 
turned on. 


If the second part of the work area 
is not large enough to contain the 
message received in the input buffer 
of the ALCB, and if a user-written 
routine has been specified in the OVAD 
keyword operand, linkage is made to 
this routine. On return from this 
routine, or if it has not been 
specified, the length of the input 
message is reduced to the size of the 
second part of the work area. The 
remainder of the message, which cannot 
be placed in the work area, is 
ignored. 


The length of the message is stored 
into the GET/PUT prefix (first two 
bytes) of the work area (second part) 
and, according to this length, the 
message data is moved from the ALCB 
into the work area (second part). 


The address of the ALCB is stored 
into the high-priority GET audio 
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element which is posted (SVC 31) to 
the special GET audio queue. On 
activation of the GET audio subtask, 
the GET bit is set on the ALCB, and 
control returns to the calling section 
of this module. 


When a record or an audio message is in 
the work area, return iS made to the next 
instruction in the message processing 
program. 


External Routines Used: 
OPOST (SVC 31) 


QWAIT (SVC 30) 
GET SEGMENT OR AUDIO MESSAGE ROUTINE 


Module Name: IJLQGD (Charts GF and GG) 
Entry Points: This routine is entered at 
the following points: 


1. IJLQGDt8 via linkage generated by the 
GET macro expansion. Upon entry, 
register 0 contains the address of the 
work area, and register 1 contains the 
address of the DTF table for an 
MSprocess queue. 


2e IJLQOGD20414 from the QOTAM Control 
Program. This entry is an audio 
section that runs in supervisor state 
to avoid crossrpartition storage 
protection in turning on the GET bit 
in an ALCB (in the foreground-1 
partition). Upon entry into the GET 
audio subtask, the address of the 
high-priority GET audio element, which 
contains the address of the passed 
ALCB, iS in register 1. 


Function: Provides the next sequential 
message segment or audio message in a 
specified work area. This work area is 
made up of two consecutive parts: the 
first part used to receive message 
segments, the second to receive audio 
messages. The lengths of these parts are 
specified in the SOWA and SOWARU keyword 
operands, respectively. 


The routine first removes the MS process 
queue from the Ready Queue through a QWAIT 
(Svc 30) on the Ready Queue itself and then 
tests to determine whether an element 
(buffer or ALCB) is in the process queue. 


1. If not, and if a user-written routine 
has been specified to handle this 
Situation (SYNCAD keyword operand), 
linkage is made to this routine. 
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Exception: If CLOSEMC has been issued 


to initiate a closedown procedure Va 
(master receive switch off), control 
is transferred to the routine ce 


specified via the FLUSHAD keyword 
operand. 


If yes (or if no user-written routine 
specified), a test is made to 
determine whether part of a segment 
remains in a buffer obtained from a 
previous GET. 


a. If not, and if the last processed 
element is not an ALCB, the 
previous buffer is released to the 
Return Buffer queve through an 
Svc 31 (QPOST), and the next 
element is requested through an 
Svc 30 (QWAIT) on the process 
queue. (If no element in the 
queue, control does not return 
until another element arrives. ) 
The address of the buffer is 
returned to register 1. At this 
point the header disk pointer is 
saved for use by the next 
checkpoint. 


b. If yes, the QPOST/QWAIT sequence 
is bypassed, because the remaining 
data in the buffer must be handled 
before releasing the buffer. The 
count and starting address of the ia 
remaining data are computed before 
continuing. : 


The routine makes a test to determine 


whether the next element to be processed is 
a buffer or an ALCB. 


13 


If it is a buffer, if this buffer 
contains the header, and if the source 
terminal displacement (BSTO in buffer 
prefix) is not zero, the source 
terminal name is moved into the area 
specified in the TRMAD keyword 
operand. (The source displacement is 
zero if the message is from another 
message processing program, or if the 
message arrived over a Switched or 
autopolled line for which the SOURCE 
macro instruction was not included in 
the incoming LPS.) The user's switch 
specified in the SWITCH keyword 
operand is turned off. 


The message segment is moved from 
the buffer into the first part of the 
work area using the segment size, or 
the size of the work area (first part) 
if smaller. If the entire data has 
been moved into the work area, the 
type and length of the data moved is 
stored into the GET/PUT prefix. 


ia 
If the first part of the work area \ 
is not large enough to contain the : 








entire segment, and if a user-written 
routine has not been specified to 
handle this situation (OVAD keyword 
operand), the count of the data not 
transferred is computed and stored for 
the next GET. If a user-written 
routine has been specified, linkage is 
made to this routine. In either case, 
the remaining data will be supplied on 
the next GET. 


2. if it is an ALCB, the address of the 
source line name is computed, and the 
line name is moved into the area 
specified in the LINAD keyword 
operand. The user‘s switch specified 
in the SWITCH keyword operand is 
turned on. 


If the second part of the work area 
is not large enough to contain the 
message received in the input buffer 
of the ALCB, and if a user-written 
routine has been specified in the OVAD 
keyword operand, linkage is made to 
this routine. On return from this 
routine, or if it has not keen 
specified, the length of the input 
message is reduced to the size of the 
second part of the work area. The 
remainder of the message, which cannot 
be placed in the work area, is 
ignored. 


The length of the message is stored 
into the GET/PUT prefix (first two 
bytes) of the work area (second part) 
and, according to this length, the 
message data is moved from the ALCB 
into the work area (second part). 


The address of the ALCB is stored 
into the high-priority GET audio 
element which is posted (SVC 31) to 
the special GET audio queue. On 
activation of the GET audio subtask, 
the GET bit is set on in the ALCB, and 
control is returned to the calling 
section of this module. 


When a segment or an audio message is in 
the work area, return is made to the next 
instruction in the message processing 
program. 


External Routines Used: 


QPOST (SVC 31) 


QWAIT (SVC 30) 


‘Entry Point: 


GET MESSAGE ROUTINE 


Module Name: IJLOQGM (Charts GM and GN) 
This routine is entered at 
ITJLQGM+8 via linkage generated by expansion 
of the GET macro. Upon entry, register 0 
contains the address of the work area, and 
register 1 contains the address of the DTF 
table for an MS process queue. 


Function: Provides the next sequential 
message in a specified work area. 


The routine first makes a test to 
determine if there is a message in the 
process queue. If there is none and if a 
user-written routine has been specified to 
handle this situation (SYNCAD keyword 
operand), linkage is made to the specified 
routine. Exception: If no message is in 
the queue and CLOSEMC has been issued (the 
master receive switch is off), exit is made 
to the routine specified via the FLUSHAD 
keyword operand. 


If there is a message in the queue, or 
if no message is in the queue but no 
user-written routine is specified, a test 
is made to determine if there is message 
data remaining in the buffer froma 
previous GET. If there is no message data, 
the previous buffer is released to the 
Return Buffer queue through an SVC 31 
(QPOST), and a request for the next buffer 
is made by a QWAIT (SCV 30) on the process 
queue. (If there is no message in the 
queue, control does not return until 
another message arrives.) The address of 
the buffer is returned in register 1. 


At this point, the header disk pointer 
is saved for use by the next checkpoint. 


If there was data remaining in the 
previous buffer, the QPOST/QWAIT sequence 
is bypassed because the remaining data in 
that buffer must be handled before 
releasing it; the count and starting 
address of the remaining data are computed 
before continuing. 


If the current buffer contains the 
header and if the source terminal 
displacement (BSTO in buffer prefix) is not 
zero, the source terminal name is moved 
into the area specified in the TRMAD 
keyword operand. (The source displacement 
is zero if the message is from another 
processing program or if the message 
arrived over a switched or autopolled line 
for which the SOURCE macro was not included 
in the incoming LPS.) 


The message data is moved from the 


buffer into the work area using the size of 
the data or size of remainder of work 
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area,if smaller. If all data in the buffer 
has been moved into the work area, a test 
is made for end of message. If it is not 
end of message, a loop is made to release 
this buffer and to QWAIT for the next 
buffer. If it is the end of message, the 
type and length of data moved are stored in 
the GET/PUT prefix and return is made to 
the next instruction in the processing 
program. 


If the work area was not large enough to 
contain the entire message and if a 
user-written routine is not specified to 
handle this case (OVAD keyword operand), a 
count of the data remaining in the buffer 
is computed and stored before returning to 
the calling routine. If a user-written 
routine is specified, linkage is made to 
the specified routine. In either case, 
remainder of the message is moved to the 
work area when the next GET is issued. 


the 


External Routines Used: 
QPOST (SVC 31) 


QWAIT (Svc 30) 


GET RECORD ROUTINE 


Module Name: IJLOGR (Charts GQ and GR) 
Entry Point: This routine is entered at 
IJLOGR+8 via linkage generated by expansion 
of the GET macro. Upon entry, register 0 
contains the address of the work area, and 
register 1 contains the address of the DTF 
table for an MS process queue. 


Function: Provides the next sequential 
message record in a specified work area. 


The routine first makes a test to 
determine if there is a message in the 
process queue. If there is none and if a 
user-written routine has been specified to 
handle the situation (SYNCAD keyword 
operand), linkage is made to the specified 
routine. Exception: If no message is in 
the queue and CLOSEMC has been issued to 
initiate a closedown procedure (the master 
switch is off), exit is made to the routine 
specified via the FLUSHAD keyword operand. 


If there is a message in the queue or if 
no message is in the queue but no 
user-written routine is specified, a test 
is made to determine if part of a record 
remains in the buffer from a previous GET. 
If not, the previous buffer is released to 
the Return Buffer queue through an SVC 31 
(QPOST), and a request for the next buffer 
is made by a QWAIT (svc 30) on the process 
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queue. (If there is no message in the 
queue, control does not return until 
another message arrives.) The address of 
the buffer is returned in register 1. 


At this point, the header disk pointer 


is saved for use by the next checkpoint. 


If there was data remaining in the 
previous buffer, the QPOST/QWAIT sequence 
is bypassed because the remaining data in 
that buffer must be handled before 
releasing it. The count and starting 
address of the remaining data are computed 
before continuing. 


If the current buffer contains the 
header and if the source terminal 
displacement (BSTO in buffer prefix) is not 
zero, the source terminal name is moved 
into the area specified in the TRMAD 
keyword operand. (The source displacement 
is zero if the message is from another 
processing program or if the message 
arrived over a switched or autopolled line 
for which the SOURCE macro was not included 
in the incoming LPS.) 


The data in the buffer is moved into the 
work area one byte at a time until either: 


1. anew line (NL) or EOB character is 
encountered in the buffer; or 


2. the work area has been filled. 


If a NL or EOB character is found, it is 
moved to the work area along with any 
consecutive NLs or EOBs that immediately 
follow it. The type of message unit and 
record length are placed into the GET/PUT 
prefix, and return is made to the calling 
routine. 


If the work area is not large enough for 
the entire record, the count of the data 
not transferred is computed and stored for 
the next GET. If a user-written routine 
has been specified to handle this 
Situation, linkage is made to that routine. 
If no such routine is specified, return is 
to the calling routine. In either case, 
the remaining data will be supplied on the 
next GET. 


If neither of the preceding conditions 
specified is encountered in the current 
buffer, a QWAIT is issued requesting 


another buffer and the procedure is 
repeated. 


External Routines Used: 
QWAIT (SVC 30) 


QPOST (SVC 31) 


f ™ 











GET SEGMENT ROUTINE 


Module Name: IJLQGS (Chart GS) 

Entry Point: This routine is entered at 
IJLQGS+8 via linkage generated by expansion 
of the GET macro. Upon entry, register 0 
contains the address of the work area, and 
register 1 contains the address of the DTF 
table for an MS-Process Queue. 


Function: Provides the next sequential 
message segment in a specified work area. 


The routine first makes a test to 
determine if there is a message in the 
process queue. If there is none and if a 
user-written routine has been specified to 
handle this situation (SYNCAD keyword 
operand), linkage is made to the specified 
routine. Exception: If no message is in 
the queue and CLOSEMC has been issued to 
start a closedown procedure (master receive 
Switch is off) exit is made to the routine 
specified by the FLUSHAD keyword operand. 


If there is a message in the queue or if 
no message is in the queue but no 
user-written routine is specified, a test 
is made to determine if part of the segment 
remains in the buffer from a previous GET. 
If not, the previous buffer is released to 
the Return Buffer queue through an SVC 31 
(QPOST), and a request for the next buffer 
is made by issuing a QWAIT (SVC 30) on the 
process queue. (If there is no message in 
the queue, control does not return until 
another message arrives.) The address of 
the buffer is returned in register 1. 


At this point, the header disk pointer 
is saved for use by the next checkpoint. 


If there was data remaining in the 
previous buffer, the QPOST/QWAIT sequence 
is bypassed because the remaining data in 
that buffer must be handled before 
releasing it. The count and starting 
address of the remaining data are computed 
before continuing. 


If the current buffer contains the 
header and if the source terminal 
displacement (BSTO in buffer prefix) is not 
zero, the source terminal name is moved 
into the area specified in the TRMAD 
keyword operand. (The source displacement 
is zero if the message is from another 
processing program or if the message 
arrived over a switched or autopolled line 
for which the SOURCE macro was not included 
in the incoming LPS.) The message segment 
is moved from the buffer into the work area 
uSing the size of the segment or the size 
of the work area, if smaller. If all data 
has been moved into the work area, the type 
and length of data moved is stored in the 


GET/PUT prefix and return is made to the 
next instruction in the processing program. 


If the work area was not large enough to 
contain the entire segment and if a 
user-written routine is not specified to 
handle this case (OVAD keyword operand), a 
count of the data remaining in the buffer 
is computed and stored before returning to 
the calling routine. If a user-written 
routine is specified, linkage is made to 
the specified routine before returning. In 
either case, the remainder of the segment 
is moved to the work area when the next GET 
is issued. 


External Routines Used: 
OPOST (SVC 31) 


QWAIT (Svc 30) 


PUT AUDIO MESSAGE ROUTINE 


Module Name: IJLOPA (Chart PA) 
Entry points: This routine is entered at 
the following points: 


1. IJLQPA+t12 via linkage generated by the 
PUT macro expansion. Upon entry, 
register 0 contains the address of the 
work area, and register 1 contains the 
address of the DTF table for an Audio 
Output queue. 


2. IJLQPA20414 from the QTAM Control 
Program. This entry is a special 
section running in the supervisor 
State to avoid cross-partition storage 
protection in moving the audio output 
message from the work area (ina 
message processing program) into the 
ALCB (in the foreground-1 partition). 
Upon entry in the PUT audio subtask, 
the address of the high-priority PUT 
audio element, which contains the 
address of the passed ALCB, is in 
register 1. 


Function: Moves an audio output message 


from a specified work area into an ALCB, 


and causes this ALCB to be posted on the 
ARU-Send queue for emission of the audio 
answer. 


The audio line table is searched to 
locate the line entry for the destination 
specified in the LINAD keyword operand. If 
the audio line name specified by the user 
is invalid, an error code of X'0O4U" is 
returned to the calling routine in register 
15, right-adjusted. 
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The ALCB is searched from the line 
entry, and the GET bit is tested to 
determine if this ALCB corresponds to a 
line waiting for an audio answer. If the 
GET bit is off, the audio destination is 
considered invalid because no switching is 
allowed on audio lines, and an error code 
of X*°02" is returned to the calling routine 
in register 15, right-adjusted. 


The length of the output message is 
checked to make sure it is greater than the 
Size of the GET/PUT prefix (2 bytes), and 
the address of the ALCB is stored into the 
high-priority PUT audio element which is 
posted (SVC 31) to the special PUT audio 
queue. 


On activation of the PUT audio subtask, 
the following operations are performed in 
the passed ALCB: the audio output message 
is moved from the work area into the 
address chain buffer, the GET bit is set 
off, and the priority code is set to X'FD'‘ 
before return is made to the calling 
section of the PUT Audio Message routine. 


The ALCB is posted (SVC 31) to the 
ARU-Send queue, and control is transferred 
to the next instruction in the message 
processing program. When a 7772 line is 
waiting for a DCV buffer a warning code of 
X*08" is returned in register 15 but the 
audio answer will be sent as soon as a DCV 
buffer is available. 


External Routines Used: 


QPOST (SVC 31) 


PUT MESSAGE ROUTINE 


Module Name: IJLQPM (Chart PM) 


Entry Points: 


1. IJLQPMt12 from the PUT macro 
expansion. Upon entry, register 0 
contains the address of a work area, 
and register 1 contains the address of 
the DTF table. 


2. IJLQPM+60 from the Buffer~BRB routine. 
This entry is to a special section of 
the PUT message routine which runs in 
Supervisor state to circumvent 
cross-partition storage protection in 
moving the message from the work area 
(in a message processing program) to a 
buffer (in the F1 partition). Upon 
entry, register 1 contains the address 
of the available buffer. 
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Function: Moves a complete message from a 
specified work area to a buffer (more than 
one buffer is used, if necessary) and 
causes the buffer(s) to be routed to the 
Specified destination (or process) queue on 
the direct-access storage device. 


A request for a buffer into which to 
move the message data is initiated by 
posting (via an SVC 31) a BRB (contained in 
the first 4 words of the DTF table) to the 
Active BRB queue, A QWAIT (Svc 30) is then 
issued to wait for a buffer to become 
available. Normal return from this QWAIT 
does not occur until the following 
procedure is completed: 


When the buffer assigned for the PUT 
operation is passed to the Buffer-BRB 
routine (in module IJLOIP), that routine 
links to a special section of the PUT 
Message routine (entry point 2 above) that 
executes under the storage protection key 
of the Supervisor. If the buffer is to 
contain the message header, the following 
procedures are performed: 


1. The address of a special LCB contained 
in the DTF table is placed into the 
BLCB field of the buffer prefix. 


2. The number of idle characters (X‘'17"'), 
if any, at the beginning of the work 
area iS computed and placed in the 
scan pointer field (BSPT) of the 
prefix for later use in the Send Group 
of the LPS. 


3. The sequence-in and sequence-out 
fields (BNIN and BNOT) in the prefix 
are set to zero. 


G. The terminal table is searched to 
locate the entry for the destination 
specified via the TRMAD keyword 
operand. The relative address of the 
located entry is placed into the 
destination key (BDTO field) in the 
prefix. The address of the QCB for 
the destination is obtained from the 
entry and placed into the LCB. 


5. If the user has specified a priority 
for the message (4th byte of GET/PUT 
prefix is nonzero), the priority code 
is placed in the LCB. 


The message data is then moved into the 
buffer using the length specified in the 
GET/PUT prefix, or the size of the buffer 
(minus the prefix) if the buffer cannot 
contain the entire message. If the latter 
occurs, the residual count of the message 
data in the work area is computed and 
saved, and the work area pointer is updated 
and saved, The count of the data moved 
into the buffer is placed into the BSSZ 
field of the prefix, and the source key 
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(BSTO field) in the prefix is set to zero 
to indicate a processing program as the 
source. 


If the entire message (or the last 
portion of the message) is in this buffer, 
the end-of-message bit is set in the BSTA 
field of the prefix. Otherwise, the 
appropriate indicator is set in BSTA 
depending on whether the buffer contains a 
header or text segment. Exit is then made 
to the Interim LPS routine, which causes 
the QWAIT to be satisfied. Control returns 
to the PUT message routine in problem 
program state to the instruction following 
the QWAIT. 


The buffer returned by the QWAIT has 
already been filled with the message data 
as described. This buffer is now posted 
(Svc 31) to the specified destination 
queue. A QWAIT (SVC 30) is then issued to 
remove the BRB from the top of the Ready 
Queue. If the entire message has been 
handled, return is made to the calling 
routine. If further message data remains 
in the work area, the routine branches to 
request another buffer and the procedure 
described above is repeated. This 
continues until the entire message has been 
transferred and posted. 


Note: If an invalid destination is 
specified, no transfer of message data 
occurs. An error code of X"20" is returned 
to the calling routine in register 15, 
right-adjusted. 


External Routines Used: 


QPOST (SVC 31) 


QWAIT (Svc 30) 


PUT RECORD ROUTINE 


Module Name: IJQPR (Charts PQ and PR) 


Entry Points: 


1. IJLQOPR+12 from the PUT Macro 
expansion. Upon entry, register 0 
contains the address of the work area 
and register 1 contains the address of 
the DTF table. 


2. IJLOPR+60 from the Buffer BRB routine 
(see PUT Message routine description). 


Function: Moves the message record from 
the specified work area into a buffer (or 
more than one buffer if necessary). When a 
buffer is filled, it is posted to the 
specified destination queue. 


This routine issues a QPOST/QWAIT 
sequence to request a new buffer in the 
same manner described in the PUT Message 
routine. The QWAIT is not satisfied until 
the following procedure is completed: 


When the buffer assigned for the PUT 
operation is passed to the Buffer-~BRB 
routine (in module IJLQIP), that routine 
branches to a special section of the PUT 
Record routine (entry point 2 above) that 
executes under the protection key of the 
Supervisor. 


Preparation for later releasing of the 
buffer obtained (called the “new™ buffer in 
this discussion) by the QWAIT is performed 
by placing the address of the Available 
Buffer queue into the BQCB field of the 
buffer prefix. The BRB contained in the 
DTF table for the MS Destination queue is 
linked into the top of the Ready Queue in 
preparation for requesting the next buffer. 
A test is made to determine if there is a 
buffer (called the “previous™ buffer) that 
was not completely filled with message data 
by the previous PUT. 


Note: This routine does not post a buffer 
to the specified destination queue until 
the buffer is filled or until an end of 
message is indicated. 


The example of a previous buffer is 
discussed later; however, it should be 
noted here that there will always be a 
previous buffer except when the preceding 
PUT was for the last record in the message 
(end of message). 


The procedures performed when there is 
no previous buffer are now described. 
Because the last record PUT was the end of 
that message, the current record must be a 
header segment; therefore, the following 
initialization procedures are performed for 
the “new"™ buffer: 


1. The address of the LCB is placed into 
the buffer prefix. 


2. The number of idle characters (X*%17"'), 
if any, at the beginning of the 
specified work area is computed and 
placed in the scan pointer field 
(BSPT) of the prefix for later use in 
the Send Group of the LPS. 


3. The sequence-in and sequence-out 
fields in the prefix are set to zero. 


4. The source key (BSTO field) in the 
prefix is set to zero to indicate a 
processing program as the source. 


5. The terminal table is searched to 


locate the entry for the specified 
destination. The relative address of 
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the located entry is placed into the 
destination key (BDTO field) of the 
prefix. The address of the QCB for 
the destination is obtained from the 
entry and placed into the ICB. 


6. If the user has specified a priority 
for the message (4th byte of GET/PUT 
prefix is nonzero), the priority code 
is placed in the LCB. 


The message data is then moved into the new 
buffer using the record length specified in 
the GET/PUT prefix, or the size of the 
buffer (minus the prefix) if the buffer 
cannot contain the entire record. 


Tf the record size is used for the move, 
the third byte in the GET/PUT prefix is 
tested to determine if this is the end of 
the message (EOM). If EOM is detected, the 
EOM bit is set in the buffer prefix; the 
new buffer is linked into the top of the 
Ready Queue; and exit is made to the 
Qdispatch subroutine. | 


Qdispatch causes the new buffer to be 
routed to the specified destination and 
effects return to the QWAIT issued in the 
problem program portion of the PUT Record 
routine, which then returns to the calling 
routine. If this was not the end of the 
message, the new buffer address is saved 
(it is not posted) and return is effected 
to the calling routine. On the next PUT 
issued, the current new buffer then becomes 
the previous buffer. 


If the buffer was not large enough to 
contain the entire record, the residual 
count of the message data in the work area 
is saved, and the work area pointer is 
updated and saved. The message-filled 
buffer is then linked into the top of the 
Ready Queue pushing the BRB previously 
placed at the top of the Ready Queue to 
second in line. Exit is made to Qdispatch, 
which routes the buffer to its destination. 
The BRB now becomes the first item on the 
Ready Queue. Therefore, another buffer is 
assigned for this PUT operation, and the 
supervisor section of the PUT Record 
routine iS again entered. 


The procedure is repeated, but only 
those functions required for a buffer 
containing a text segment are performed. 
This process continues until the entire 
record has been transferred. When this 
occurs, control is effected to the calling 
routine. 


The procedures performed upon entry into 
this routine when there is a previous, 
unfilled buffer from the preceding PUT are 
now described. The new buffer (obtained by 
the QWAIT) is released by linking it in to 
the top of the Ready Queue (the address of 
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the Available Buffer QCB was previously 
inserted in the ECB of the buffer). This 
pushes the BRB down to second position on 
the Ready Queue. 


A test is then made to determine if the 
record currently in the user's work area 
contains a header. It should not because 
the previous record did not have the end of 
message indicator. However, if the current 
record does begin a new message, 
end-of-message must be forced for the 
record in the previous buffer. The EOM bit 
is set in the buffer prefix, and the field 
containing the address of the previous 
buffer is cleared to zero. The previous 
buffer is linked into the top of the Ready 
Queue, and exit is made to the Qdispatch 
subroutine. Upon exit, the order of items 
on the Ready Queue is: 


1. the previous buffer, 


2. the new buffer, and 


3. the BRB. 


This causes the following action: The 
previous buffer containing the last record 
of the preceding message is posted to the 
destination queue; the new buffer is 
released to the Available Buffer queue; and 
another new buffer is assigned for the 
current record which is the first record of 
a message. Control then returns to the 
Supervisory section of the PUT Record 
routine at IJLQPR+60. The current record 
is now handled in the same manner described 
for the case where there was no previous 
buffer. 


If the current record in the work area 
does not contain a header, the routine 
branches to move the record into the 
remaining area of the previous buffer. The 
current record is handled in the manner 
already described for handling a record 
that contains text only. 


External Routines Used: 
QOPOST (SVC 31) 


QWAIT (Svc 30) 


PUT SEGMENT ROUTINE 


Module Name: IJLOPS (Chart PS) 


Entry Points: 


1. IJLOPSt+12 from the PUT macro 
expansion. Upon entry, register 0 
contains the address of a work area, 
and register 1 contains the address of 
the DTF table. 
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2. IJLQPS+60 from the Buffer-BRB routine. 
This entry is to a special section of 
the PUT Segment routine which runs in 
supervisor state to circumvent 
cross-partition storage protection in 
moving the message from the work area 
(in a message processing program) to a 
buffer (in the F1 partition). Upon 
entry, register 1 contains the address 
of the available buffer. 


Function: Moves a message segment from a 
specified work area to a buffer (more than 
one buffer is used, if necessary) and 
causes the buffer(s) to be routed to the 
specified destination (or process) queue on 
the direct-access storage device. 


A request for a buffer into which to 
move the segment is initiated by posting 
(via an SVC 31) a BRB (contained in the 
first 4 words of the DTF table) to the 
Active BRB queue. A QWAIT (Svc 30) is then 
issued to wait for a buffer to become 
available. Normal return from this CWAIT 
does not occur until the following 
procedure is completed: 


When the buffer assigned for the PUT 
operation is passed to the Buffer-BRB 
routine (in module IJLOIP), that routine 
links to a special section of the PUT 
Segment routine (entry point 2 above) that 
executes under the storage protection key 
of the Supervisor. If the buffer is to 
contain the message header, the following 
procedures are performed: 


1. The address of a Special LCB contained 
in the DTF table is placed into the 
BLCB field of the buffer prefix. 


2. The number of idle characters (X"17"), 
if any, at the beginning of the work 
area is computed and placed in the 
scan pointer field (BSPT) of the 
prefix for later use in the Send Group 
of the LPS. 


3. The sequence-in and sequence-out 
fields (BNIN and BNOT) in the prefix 
are set to zero. 


4. The terminal table is searched to 
locate the entry for the destination 
specified via the TRMAD keyword 
operand. The relative address of the 
located entry is placed into the 
destination key (BDTO field) in the 
prefix. The address of the QCB for 
the destination is obtained from the 
entry and placed into the LCB. 


5. If the user has specified a priority 
for the message (4th byte of GET/PUT 
prefix is nonzero), the priority code 
is placed in the LCB. 


Module Name: 


The message data is then moved into the 
buffer using the length specified in the 
GET/PUT prefix, or the size of the buffer 
(minus the prefix) if the buffer cannot 
contain the entire segment. If the latter 
occurs, the residual count of the message 
data in the work area is computed and 
saved, and the work area pointer is updated 
and saved. The count of the data moved 
into the buffer is placed into the BSSZ 
field of the prefix, and the source key 
(BSTO field) in the prefix is set to zero 
to indicate a processing program as the 
source. 


The appropriate indicator is set in the 
BSTA field of the prefix depending on 
whether the buffer contains a header or 
text segment. Exit is then made to the 
Interim LPS routine which causes the QWAIT 
to be satisfied. Control returns to the 
PUT Segment routine in problem program 
State to the instruction following the 
QWAIT. 


The buffer returned by the QWAIT has 
already been filled with the message data 
as described. This buffer is now posted 
(Svc 31) to the specified destination 
queue. A QWAIT (SVC 30) is then issued to 
remove the BRB from the top of the Ready 
Queue. 


If the entire segment has been handled, 
return is made to the calling routine. If 
further message data remains in the work 
area, the routine branches to request 
another buffer and the procedure described 
above is repeated. This continues until 
the entire segment has been transferred and 
posted. 


Note: If an invalid destination is 
specified, no transfer of message data 
occurs. An error code of X'20° is returned 
to the calling routine in register 15, 
right-adjusted. 





External Routine Used: 
QPOST (SVC 31) 


QWAIT (Svc 30) 


CLOSE MESSAGE CONTROL ROUTINE 


IJLQQT (Chart QT) 


Entry Point: Expansion of the CLOSEMC 
macro instruction generates linkage to this 
routine at IJLQQT, uSing register 15 as the 
entry register and 14 as the return 
register. No parameters are required. 


Message Processing Program Routines 83 


Function: This routine stops all active 
lines in the system, sets the 
“master-receive-switch™ so that no more 
incoming traffic is accepted, and then 
resumes outgoing message traffic. 


The routine turns off the master-receive 
Switch by posting (via an SVC QPOST) the 
OMOVE QCB to itself. This causes the 
QOMOVER subtask to be activated to perform 
the actual manipulation of the switch (in 
the F1 partition). MThe address of the 
master-receive;-Switch, as obtained from the 
VECMRSW field in the QTAM Vector Table, is 
passed to the QMOVER routine in register 4. 
The master-receive-Switch is located at 
IJLOMRSW in the Implementation module 
(IJLQIP). 


At open time, the QTAM Open routines 
(Modules IJLQ01, IJLQO2, IJLQO7, and 
IJLQ08) chained together all of the DTF 
tables for QTAM files opened in the message 
control program and placed the address of 
the last such DTF into the VECLDTF field of 
the QTAM Vector Table. When this address 
is used as a starting point, the Close 
Message Control routine is able to access 
each DTF table for a line group file; and 
through each such DTF table, all of the 
LCBs (or ALCBs) for the lines in the line 
group. 


Each LCB generated in the system is 
accessed, in turn, and a test is made to 
determine if the line associated with the 
LCB is currently active (LSTA = X*00' 
indicates inactive). If the line is 
inactive, it is bypassed. If it is active, 
the following action is taken: 


1. A STOPLN macro instruction is issued 
for the line; then 


2. A STARTLN macro instruction is issued 
for the line. 


The significance of the preceding procedure 
is: The STOPLN causes all operations on 
the designated line to cease after the 
current transmission is completed (see 
Change Line routine description). The 
following STARTLN causes the same line to 
be reactivated for output only operations. 
Each time the Receive Scheduler routine (in 
module IJLOIP) is entered, it examines the 
master-receive-switch. If it is off (as is 
the case at this point), input operations 
are not initiated on the line. 


Each ALCB generated in the system is 
accessed, in turn, anda test is made to 
determine if the audio line associated with 
the ALCB is currently enabled (LSTS=x'‘'01'" 
indicates the enable state). If the line 
is not enabled, the next ALCB is accessed. 
If the line is enabled, the ALCB address is 
stored in a high-priority audio element. 


84 DOS QTAM Program Logic Manual 


This element posted (via an SVC QPOST) to 
the LPS queue requests a HALT I/O operation 
(via an SVC 27) on the line associated with 
the passed ALCB. Each time the Audio Line 
Appendage routine is entered (in module 
IJLQAA), it examines the master-receive 
Switch. If it is off (as is the case at 
this point), no enabling is initiated on 
the line. 


The preceding procedure is repeated for 
each active line in the system. The net 
effect, upon return to the calling routine, 
is that all line input into the system has 
been stopped, while line output operations 
continue aS normal. In addition, the QOTAM 
Ready Queue is scanned to search for ALCB 
elements to be processed in a message 
processing program. Any such ALCBs found 
are removed from the Ready Queue and queued 
by priority in the element chain of their 
corresponding MS-process queues. 


External Routines Used: 


QOPOST (SVC 31) 


Change Line (module IJLQCL) 


DTF File Locator (module IJLOQOFL) 


RETRIEVE DASD ROUTINE 


Module Name: IJLQRD (Chart RD) 

Entry Point: Expansion of the RETRIEVE 
macro instruction generates linkage to this 
routine at IJLOQRD. Upon entry, register 1 
contains the DASD relative record number of 
the message segment to be retrieved, and 
register 0 contains the address of the 
specified work area. 


Function: The Retrieve-DASD routine 
transfers a message segment previously 
placed in a DASD destination or DASD 
process queue to.a specified work area. 


If an invalid relative record number is 
specified, no action is taken, and return 
is made to the calling routine with an 
error code of X"'02*" in register 15, 
right-adjusted. (OTAM maintains the last 
relative record number used on the disk in 
the VECDRNN field of the QOTAM Vector 
Table). 


If the operation is to proceed, the 
routine builds a BRB-OCB (in the work area 
specified by the user) as follows: The 
passed relative record number is placed in 
the BRB (RNSA field) as the address of the 
next segment to be read from the disk, and 
the status byte (RSTA field) in the BRB is 
set to 9 to indicate a read-from-disk 
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operation. The address of the STCB for the 
Queue Insert by Priority subroutine is 
placed into the QSTC field of the QCB. The 
BRB/QCB is then posted (via an SVC QPOST) 
to the Disk I/0 QCB. Return from the SVC 
indicates that the read-from-disk operation 
has been initiated. An SVC QWAIT is then 
issued to wait for completion of the disk 
operation. This QWAIT SVC returns the main 
storage address of the retrieved segment in 
register 1. Yet another SVC QWAIT is 
required to ensure that the BRB/QCB is 
taken off the Ready Queue before it is 
overlaid in the work area. 


The size of the segment retrieved is 
obtained from the BSSZ field in its buffer 
prefix and is used to move the segment into 
the specified work area. Return is to the 
calling routine. Note that the buffer 
prefix, minus the first 8 bytes, is 
included in the data moved to the work 
area. 


External Routines Used: 


QPOST (Svc 31) 


QWAIT (Svc 30) 


RETRIEVE BY SEQUENCE NUMBER ROUTINE 


Module Name: IJLORS (Chart RS) 
Entry Point: Expansion of the RETRIEVE 
macro generates linkage to this routine at: 


1. IJLQORS if input sequence number is 
specified, or 


2. IJLQORSt2 if output sequence number is 
specified. 


On entry, register 1 contains the sequence 
number of the message header to be 
retrieved and register 0 contains the 
address of the work area into which the 
header segment is to be placed. The first 
8 bytes of the work area contain the name 
of the terminal (or processing program) 
from whose DASD queue the message header is 
to be retrieved. 


Function: This routine causes the header 
segment of the requested message to be 
retrieved from the specified DASD queue and 
placed into a user-provided work area. 


If an invalid terminal name or an 
invalid sequence number is specified, no 
action is taken. An error code (X"20" for 
invalid terminal name or X‘40*" for invalid 
sequence number) is set in register 15, 
right-adjusted, and return is made to the 
calling routine. 


This routine searches the terminal table 
to locate the terminal table entry for the 
specified terminal. The address of the QCB 
for the DASD queue is obtained from the 
TQAD field of the terminal table entry 
located. In the QBAK field of the OCB is 
the relative record number of the header 
segment of the last message placed on the 
DASD queue. Using this as a starting 
point, this header segment and each 
preceding header segment in the DASD queue 
are retrieved, in order, until the header 
segment having the desired sequence number 
is found. 


Implementation of the preceding general 
procedure is as follows: This routine 
generates linkage to the Retrieve DASD 
routine (Module IJLQRD) which actually 
causes the message segment to be read from 
the DASD queue and placed into the work 
area. Parameters passed to the Retrieve 
DASD routine are: register 0 contains the 
address of the work area and register 1 
contains the relative record number of the 
segment to be retrieved. 


Upon return from the Retrieve DASD 
routine, the specified sequence number is 
compared with the sequence number in the 
header prefix (BNIN field if input sequence 
number was specified or BNOT field if 
output sequence number was specified). If 
the sequence numbers are equal, return is 
made to the calling routine with a X*’0C* in 
register 15. If they are unequal, the 
relative record number of the previous 
header segment in the DASD queue is 
obtained from the BMHD field of the buffer 
prefix, and the preceding procedure is 
repeated. 


External Routines Used: Retrieve DASD 


(Module IJLORD) 


RELEASE MESSAGE ROUTINE 


Module Name: IJLQORM (Chart RM) 

Entry Point: Expansion of the RELEASEM 
macro instruction generates linkage to this 
routine at IJLQRM, using register 15 as the 
entry register and 14 as the return 
register. Upon entry, parameter register 1 
points to an area containing the name 
(character string) of the terminal to which 
intercepted messages are to be released. 


Function: Turns off the “intercept" bit in 
the terminal table entry for the specified 
terminal and restores, if necessary, the 
address of the next message to be read from 
the disk. 
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A search is made of the terminal table 
to locate the terminal table entry for the 
specified terminal. If the entry is not in 
the table, return is made to the calling 
routine with an error code of X‘'20* in 
register 15. If the specified entry is 
found, the intercept bit (in the TSTA 
field) is tested. If it is not on, return 
is made to the calling routine with an 
error code of X'04* in register 15, because 
messages to the terminal have not been 
previously intercepted (via an INTERCPT 
macro in the LPS). 


The displacement (from the beginning of 
the entry) to the intercept subfield in the 
terminal table entry is obtained from the 
location where the Intercept Message 
routine placed it. If the disk address in 
the QONRA field of the QCB for the DASD 
queue is greater than the disk address in 
the intercept subfield, a priority message 
has arrived on the DASD queue. Therefore, 
the address in the intercept subfield must 
replace the address in the QNRA field or 
the intercepted messages will not be sent. 
This is accomplished by the QMOVER routine 
via an SVC QPOST. 


After the header address of the first 
intercepted message has been restored in 
the QCB, if necessary, this routine issues 
another SVC QPOST which causes the QMOVER 
routine to turn on the “send™ bit and turn 
off the intercept bit in the terminal table 
entry. Return is made to the calling 
routine. 


External Routines Used: 
QMOVER (IJLOIP80 in Module IJLOQIP) 
OPOST (SVC 31) 


START/STOP AUDIO LINE 


Module Name: IJLOSS (Chart SS) 


Entry Points: 


1. IJLQSS, from STOPARU macro expansion 
for a specified line. 


2. IJLQOSS+2, from STARTARU macro 
expansion for a specified line. 


3. IJLQSS+4, from STOPARU macro expansion 
if ALL is specified. 


GW. %IJLQSSt6, from STARTARU macro 
expansion if ALL is specified. 


Upon entry, register 0 contains the 
address of the specified DTF table with the 
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relative line number in the high-order 

byte, unless ALL has been specified. Noted ~ 
that entry to this routine is made only \ 
when the DTF Locator routine is able to 
locate the specified DTF table. Therefore, 
this routine is also entered from the QTAM 
Control Program in the supervisor mode at 
IJLQSS20+14 to prepare a stop or start line 
operation. 


Function: Causes a specified line (or ali 
lines) in the specified line group to be 
activated or deactivated depending on 
whether a STARTARU or STOPARU macro 
instruction has been issued. 


If either of the following errors is 
detected, no action is taken, and return is 
made to the calling routine with an error 
code in register 15, right-adjusted: 


1. DTF table not opened (error code 
X*01°); or 


2. invalid relative line number (error 
code X"08!'). 


If no errors are detected, the ALCB for 
the specified line (or the first ALCB in 
the line group if ALL has been specified) 
is accessed. 


The address of the ALCB is stored ina cc 
high-priority audio element, which is 
posted (via an SVC QPOST) to a start/stop 
audio queue. The dispatching of this queue 
by the QOTAM Control Program activates a 
truncated subtask included in the 
start/stop audio module. If the entry is 
from a STARTARU macro expansion, and if the 
line is not already active, the start 
request flag is set on in the ALCB 
(LSSF=X'4O" indicates start request), the 
stop flag is set off, and the EXCP flag is 
set on (LSSF=X'01° indicates EXCP request). 
If the entry is from a STOPARU macro 
expansion, the stop flag is set on in the 
ALCB (LSTS=X*"20" indicates stop request), 
and if the line group is a 7770 line group 
operating in information mode, in the 
channel program the command chaining flag 
is suppressed from the DISABLE CCW. On 
return to the problem program, if the EXCP 
flag is on in the ALCB, this ALCB is posted 
(via an SVC QPOST) to the LPS queue 
requesting a START I/O operation. 


If ALL has been specified in the 
STARTARU or STOPARU macro instruction, the 
applicable procedure is repeated for each 
line in the line group, before return is 
made to the calling routine. 


External Routines Used: 


OPOST (Svc 31) ee 











Service facilities provided by QTAM 
include Checkpoint/Restart, On-line 
Terminal Testing, Operator Control, Error 
Recovery Procedures, and Operator 
Awareness. 


The Operator Control facility is 
logically associated with the OFCTL macro 
instruction in the Line Procedure 
Specification, and is discussed in the 


section Message Control Program (LPS) 
Routines. 


The Error Recovery Procedures are 
physically a part of the Line Appendage 
module, and are discussed in the section 


Line Input and Output. 


CHECKPOINT/RESTART 


The checkpoint facility causes records to 
be written on a checkpoint records file on 
a disk. The records contain information on 
the status of the queues and the 
telecommunications network. The checkpoint 
records may be written either: 


1. At fixed intervals of time, specified 
by the user, or 


2. Whenever each message processing 
partition in the system has issued a 
CKREQ macro instruction. 


The information from the checkpoint 
records may be used to perform a Restart 
operation after a system failure. This is 
done ky performing an initial program load 
of the system, and loading the message 
control program into the same location it 
occupied when the failure occurred. If a 
restart is to be performed, this is done by 
Phase 2 of the Open Checkpoint Records File 
routine. The information saved at the most 
recent checkpoint is moved to the proper 
areas, overlaying the initial values. Thus 
the system is reinitialized to the status 
it had at the time that checkpoint was 
taken. 


If CKREQ macro instructions are issued 
in the message processing programs to 
perform checkpointing, the Checkpoint 
Request routine is entered. This routine 
links to the Checkpoint routine to take the 
checkpoint. The Checkpoint Request routine 
is discussed in the section Message 


Processing Program Routines. 


QOTAM SERVICE FACILITIES 


CHECKPOINT ROUTINE 


Module Name: IJLOCK (Chart CK) 
Entry Points: The routine is entered 
either at CHKPTRTN or at CKSTCBt6. 


Entry is at CHKPTRTN when: 


e The ENDREADY macre instruction is 
executed. 


e A timer interruption occurs, Or a CKREQ 
macro instruction iS issued ina 
message processing program. 


e The checkpoint element reaches the top 
of the Disk I/O queue. 


e A disk write operation to write a 
checkpoint record on the disk has been 
completed. 


Entry is at CKSTCBt+6 when: 


e Any but the last checkpoint request 
element is posted to the checkpoint 
request queue. 


The action taken for each type of entry 
is discussed under separate headings. 


Function: This routine causes checkpoint 
records to be written on the checkpoint 
records file either at specified intervals 
or when a CKREO macro instruction has been 
issued in every message processing 
partition. 


Entry from ENDREADY: The expansion of the 
ENDREADY macro instruction generates a 
QPOST (SVC 31) to post the checkpoint 
element to the checkpoint queue. The 
subtask activated links to the Time Delay 
routine in the Implementation module, 
passing the checkpoint interval in register 
6 and the address of the checkpoint element 
in register 4. 


Entry via_a Timer Interruption or a CKREQ 
Macro Instruction: The subtask activated 


tests to determine if entry was made 
because of a CKREQ macro instruction. If 
so, it tests to determine if all message 
processing partitions have issued CKREQ. 
If not, the subtask branches to Qdispatch. 


If all message processing partitions 
have issued CKREQ or if the entry was made 
because Of a timer interruption, the 
checkpoint data is stored into the 
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checkpoint save area. The format of the 
checkpoint save area is shown in Figure 5. 
Data saved for the checkpoint record is: 


1. From the terminal table entries, all 
fields except the first word. DSECT 
names for fields saved are: IJLQOTSIN, 
IJLQTSOT, IJLOTSTA and IJLQOTTID, plus 
all user-specified optional fields. 


2. From the destination QCBs (DSECT 
names: IJLQQNRA, IJLOQQMCT, IJLCONWA, 
and IJLQQBK). From the process QCBs 
(DSECT names: IJLOQNRA, IJLOOMCT, 
IJLQONWA, IJLQQBAK, and IJLQOFST). 


3. From the LCBs (DSECT names: IJLOQOLSTA, 
IJLQLHDR, IJLOLNAS, and IJLOLTTD). 


4. From the polling lists, ali fields 
except the first byte. (There are no 
DSECT names for fields in a polling 
list.) 


The element chain of the Disk I/O queue 
is then examined. If other elements appear 
on the Disk I/O queue, the routine places 
the checkpoint element on the Disk I/0 
queue below the other elements and branches 
to Qdispatch. When the checkpoint element 
reaches the top of the Disk I/O queue 
element chain, this routine is reentered to 
prepare to write the checkpoint record. 


If no element is on the Disk I/O queue 
element chain, the routine proceeds 
immediately to prepare to write the 
checkpoint element. 


Entry from the Checkpoint Element Reaching 


the Top of the Disk I/O Queue: The subtask 
activated sets up the channel program to 


write the checkpoint record on the DASD. 
It then branches to the QYAM Post 
subroutine to post a dummy ECB to the LPS 
queue. The LPS Control routine recognizes 
the ECB, and issues an EXCP to write the 
checkpoint record. 


Entry from the Completion of a Disk Write 
Operation: The routine tests to determine 


if all the checkpoint data has heen 
written. If it has not, the disk addresses 
are set to the next record, and the routine 
again branches to the QTAM Post subroutine 
to post the dummy ECB to the LPS queue. 
This process continues until all the 
checkpoint data is written on the disk. 

The routine then prepares the checkpoint 
control record and causes it to be written 
on the disk in the same way. 


When return is made from writing the 
control record, the routine tests to 
determine what method of checkpointing is 
being used. If the checkpoint interval 
method is being used, the routine sets up 
the necessary parameters, and links to the 
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Figure 5. Format of the Checkpoint Record 
Time Delay routine to set the next 
checkpoint interval. 


If the checkpoint request method is 
being used, the routine inserts the 
checkpoint element at the top of the Ready 
Queue, and links to the QTAM Post 
subroutine to post a check request element 
to the check request queue. The routine is 
reentered at CKSTCBt6 to post subsequent 
check request elements. 


Entry from Posting a Check Request Element: 


The routine tests to determine if there is 
more than one check request element yet to 
be posted. If so, the routine again 
inserts the checkpoint element at the top 
of the Ready Queue before linking to the 
QTAM Post subroutine to post another check 
request element to the check request queue. 
This is done until only one check request 
element remains to be posted, At this 
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Function: 


time, the routine does not insert the 
checkpoint element at the top of the Ready 
Queue, but effectively Surrenders control 
in posting the final check request element 
to the check request queue. 


External Routines Used: 
Time Delay routine in Implementation module 


Disk I/O routine in Disk I/O module 
(TJLQDA) 


LPS Control (IJLQIP20 in Module IJLQIP) 


ON-LINE TERMINAL TESTING 


The On-Line Terminal Test facility provides 
tests that can be used by the terminal 
operator as a startup procedure, and by the 
IBM customer engineer for terminal checkout 
and diagnosis of terminal failure. A test 
is requested by entering a test request 
message at a terminal. 


The Terminal Test Recognition routine, 
which is entered via the LPSTART macro 
instruction, is the only resident terminal 
test routine. The Terminal Test Header 
Analysis routine and the five terminal test 
modules for tests on particular terminal 
types are transient routines. They are 
called into the logical transient area from 
the Core Image Library when needed. These 
routines are discussed in QTAM Transient 
Routines. 


TERMINAL TEST RECOGNITION ROUTINE 


Module Name: IJLOTT (Chart TT) 

Entry Point: Expansion of the LPSTART 
macro instruction generates a BALR to the 
Terminal Test Recognition routine. Entry 
is at IJLQTT. Register 1 contains the 
address of a parameter list generated by 
the LPSTART macro. Register 6 contains the 
address of the buffer to be processed. 
Register 14 is the return register. 


Recognizes terminal test 
activity, calls terminal test transient 
routines, performs cleanup, and stops and 
restarts line operation. 


The routine checks the incoming messages 
for the test activation code (99999). If 
the code is not present, return is made to 
the LPSTART macro expansion, and normal LPS 
processing resumes. 


If the test activation code is present, 
the buffers associated with the line 
Operation are posted to a test QCB. The 
subtask activated (Terminal Test Buffer 
Routing Subtask) sets test identification 
flags in the buffer prefix containing the 
test request and posts it to the LPS queue. 
Subsequent buffers are posted to the 
available buffer queue. (Terminal Tests 
utilize only the buffer containing the 
header segment). 


Upon the next execution of the LPSTART 
macro, the buffer with the test request and 
test identification flags are processed by 
the routine. The test identification flags 
are recognized at entry to the module and 
the terminal test transient routines are 
called. These routines validate the test 
request and set up the appropriate test. 


The buffer is then posted to another 
test queue control block. The subtask 
activated stops the line to be utilized by 
the terminal tests by placing a test 
subtask control block in the STCB chain of 
the appropriate LCB. 


After the line operation has been 
stopped, further identification flags are 
set in the buffer prefix, and again the 
buffer is posted to the LPS queue. The 
flags are recognized at entry into the 
module and the test message is sent to the 
terminal. 


Upon completion of the test message 
transmission, the Line End Appendage posts 
the buffer to the LPS queue. ~All areas and 
buffers utilized by the terminal tests are 
then freed, and QTAM line operation is 
restarted on the subject line. 


If a test message is to be returned to 
the requesting terminal on a dial line, the 
transient routines are called immediately 
upon recognition of the test activation 
code. The test message is then sent to the 
terminal without utilizing the stop line 
subtask. Buffers are released to the 
available buffer queue by the buffer 
routing subtask. 


External Routines Used: 

EXCP (SVC 2) 

Recall (IJLQOIP22 in module IJLOIP) 
Cleanup (IJLQIP23 in module IJLQIP) 
Defer Entry (QTAM nucleus) 

Terminal Test Header Analysis (module 


IJLOTM) 
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OPERATOR AWARENESS ROUTINE 


Module Name: IJLQOA (Chart OA) 

Entry Points: If operator awareness is 
specified in the TERMTBL macro instruction 
(OPCTL=chars) or if the OPCTL macro 
instruction is specified, the LPS macro 
instructions POSTSEND and POSTRCV enter the 
Operator Awareness routine at IJLQOA 
instead of the Buffer Recall/Cleanup 
routine (IJLQIP22). 


Function: Sends I/O error messages or 
threshold line error counter messages to 
the operator control terminal. 


Upon entry from POSTSEND or POSTRCV, a 
test is made to determine if ERP has 
specified that an operator control error 
message is to be sent. If not, a branch is 
made to RETURN. 


The routine tests to determine if a 
threshold message is to be sent. If yes, 
the routine goes to THRESH to set up the 
threshold message. If not, the routine 
tests to determine if an I/O error message 
is to be sent. If yes, the routine goes to 
IOERR to set up the I/O error message. If 
neither message is indicated, the routine 
branches to RETURN. 


At THRESH, the routine first branches to 
a subroutine within the IJLQOA module 
called RECALL, which returns a buffer to be 
used to contain the error message. The 
threshold error message is constructed in 
the buffer. The flag that indicated that a 
threshold error message was to be written 
is turned off. 


The routine then enters SENDMSG, where 
construction of the message is completed. 
The buffer prefix is set to indicate that 
the message is to be routed to the primary 
operator control terminal. A test is made 
to determine if an I/O error message is 
also required. If it is, the routine goes 
to IOERR to set up the I/O error message. 
Otherwise, the routine branches to RETURN. 


At IOERR, the routine first branches to 
RECALL to obtain a buffer to contain the 
error message. The routine gets the index 
into the I/O error message table, turns off 
the flag that indicated that an I/O error 
message was to be sent, and constructs the 
I/O error message in the buffer. The 
routine then branches to SENDMSG. Note 
that the routine then must branch to RETURN 
from SENDMSG because the I/O error message 
flag has been turned off. 


At RETURN, a test is made to determine 


if a permanent error has occurred on the 
line and if INTREL has been indicated for 
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External Routines Used: 


this line. If so, the routine branches to 

the Buffer Recall/Cleanup routine at a 
IJLQIP22, which writes the error message on 
the proper DASD destination queue, gets 
another buffer, and returns it to this 
routine. The buffer prefix of this buffer 

is modified to indicate that it is to be 
posted to the INTREL queue. 


The routine exits to the Buffer 
Recall/Cleanup routine at IJLQIP23. If 
INTREL was not indicated, the error message 
is written on the disk at this time. If 
INTREL was indicated, the new buffer 
accessed is posted to the INTREL queue. 


RECALL Subroutine: A test is made to 
determine if the buffer just processed by 
LPS is to be placed on disk. If not, then 
it can be used to contain the error message 
and return is made to the caller. 


If the buffer is to be written on disk, 
the subroutine links to the Buffer 
Recall/Cleanup routine at IJLQIP22. Here 
the buffer is written on the disk, another 
buffer is acquired, a header is read into 
it and it is returned to the RECALL 
subroutine. RECALL returns it to the 
caller. 


Buffer 
Recall/Cleanup routine in the 
Implementation module (IJLQIP22, IJLQIP23). 


OBR/SDR ROUTINE 


Module Name: IJLQOB (Chart OB) 


This module is included in the message 
control program by means of.a V-type 
address constant generated when the OBRSDR 
operand is specified in the TERMTBL macro 
instruction. The module is a collection of 
four distinct routines necessary for the 
optional OBR/SDR function (see the DOS QTAM 


Message Control Program, Form C30-5004, 
section on OBR/SDR Error Recording). 


1. SDR Step-Counters Routine. 


This routine is entered by a BAL from 
IJLOEP, IJLQLO, or IJLOTA. The routine 
assigns sets of in-core SDR counters to 
lines or terminals and increments these 
counters according to the following 
rules: 
e If the SDR first-time switch (X'"08' 
bit in the third-from-last byte of 
the LCB) is off, control is returned 
immediately to the calling routine. 
Otherwise, this switch is turned off \ 
and the routine continues. 


\ 





e If the IJLOLTTID field in the LCB is 
nonzero (indicating that the terminal 
ID is known) and the X'10" bit is on 
in the third-from-last byte of the 
LCB (indicating that counts should be 
by terminal, if possible), the 
routine prepares to count by 
terminal. Otherwise the routine 
prepares to count by line. 


eThe routine checks the SDR counter 
offset field (IJLOTSDR in the TERM 
entry if counting by terminal; the 
last halfword of the LCB if counting 
by line). If the field is 0, no SDR 
counter set has been assigned yet; 
the next available SDR counter set is 
then assigned to the line or terminal 
by storing its offset in the SDR 
counter offset field. 


e The “total transmissions™ counter in 
the assigned SDR counter set is 
incremented by 1. 


e If the halfword following the BAL 
instruction contains a nonzero value, 
this indicates that an error should 
also be counted. The appropriate 
error counter is incremented by 1. 


If the maximum possible value has been 
reached for either counter (255 for 
total transmissions, 15 for error 
counters), the x*0O4U" bit is turned on 
in the third-from-last byte of the 
LCB. This flag will later cause this 
SDR counter set to be added to the 
corresponding set of counters on 
disk. 


Control is then returned to the calling 
routine. If not enough SDR counter 
sets are provided, some requests for 
assignment of counter sets must he 
ignored. Error counts for lines or 
terminals without assigned SDR counter 
sets will be lost. 


OBR/SDR Test Routine. 


3% 


This routine is entered from the LPS 
control routine. The routine checks 
the third-from-last byte in the LCB. 
If the X'02* bit is on, the routine 
builds an OBR record from data in the 
LCB, passes the record to the system 
OBR routines via an SVC 44, waits for 
completion, and resets the bit to zero. 
If the X*0O4"* bit is on, the routine 
builds an SDR record containing the 
counters that are about to overflow, 
passes the record to the system SDR 
routines via an SVC 43, and waits for 
completion. The bit and the SDR 
counters are then reset to zero. 
Control is returned to the LPS control 
routine. 


Check SDR First-Time Routine. 


This routine is entered by a BAL from 
IJLQEP. The routine turns on the X'‘'08° 
bit in the third-from-last byte of the 
LCB if the error retry count in the LCB 
is zero. This bit is a first-time 
Switch to prevent the SDT step-counters 
routine from counting retries. 


OBR/SDR Polltest Routine. 


This routine is entered by a BAL from 
IJLOLA. The routine determines the 
source terminal when an initial 
interrupt occurs on an autopoll line if 
the index byte from the read response 
or the residual count froma poll 
command iS available. The terminal 
table offset of the source terminal is 
stored in the IJLOLTTD field of the 
LCB. 


External Routines Used: 


Svc 43 DOS System SDR routine. 
Svc 44 DOS System OBR routine. 
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OTAM TRANSIENT ROUTINES 


There are five groups of QTAM routines that 
are dynamically fetched into the logical 
transient area for execution: 


1. QTAM Open routines (six phases). 
2. (TAM Close routines (three phases). 


3. QTAM Message Writer routines (four 
phases). 


4“. On-Line Terminal Test routines (six 
phases). 


5. QOTAM Cancel Routine (two phases). 


This section contains a detailed 
description of these routines. 


QTAM OPEN MONITOR/OPEN DASD MESSAGE QUEUES 
FILE ROUTINE 


Module Name: IJLQO1 (Chart 01) 

Entry Point: Whenever a QTAM DTF table is 
opened at execution time, the system Open 
Monitor recognizes the file as a QTAM file, 
reads the extent information if it is a 
DASD file, and fetches into the logical 
transient area the QTAM Open Monitor 
routine, which is cataloged on the Core 
Image Library under the name $$BOQO001. 
Control is then passed to this routine at 
IJLQO1. Upon entry, register 2 contains 
the address of the DIF table being opened. 


Return is made to the QTAM Open Monitor 
routine when the other Open modules have 
completed processing. 


Function: Performs preliminary 
initialization functions, analyzes the type 
of QTAM file being opened, and either 
fetches the proper OPEN module or performs 
the proper opening functions 


This routine tests to determine which 
type of QTAM file is being opened. The 
eight types of QTAM files are: 


1. DASD Messages Queues (Message 
Control). 


2. DASD Checkpoint Records (Message 
Control). 


3. DASD 7772 DCV Vocabulary (Message 
Control). 
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4. Nonaudio Line Group (Message Control). 


5. Audio Line Group (Message Control). 
6. MS Process Queue (Message Processing). 


7. %MS Destination Queue (Message 
Processing). 


8. Audio Output Queue (Message 
Processing). 


If the Audio or Nonaudio Line Group, 
MS~-Process Queues, MS~Destination Queues, 
or Audio Output Queues files are being 
opened, the routine issues a FETCH to bring 
the proper OPEN module into the transient 
area. 


The routine tests to determine if the 
DLBL information for the file has been 
initially processed. If it has not, the 
routine fetches the system Open Monitor 
(SSBOPEN), which performs this function. 


If the DASD Message Queues file is being 
opened, the routine initializes each 
partition’s communication region with the 
address of the OTAM vector table. The 
address of the DTFOT is placed in the 
vector table and in the chain of opened 
DTFs in the vector table. The PIB table of 
the message control program partition is 
modified to allow exits to QOTAM appendages 
from the supervisor. The relative record 
number of the first available record on the 
file is placed in the QTAM vector table. 

If operator awareness is included, the 
Implementation module (IJLQIP) is modified 
to cause the LPS macro instructions 
POSTSEND and POSTRCV to enter the Operator 
Awareness routine before entering the 
Buffer Recall/Cleanup routine. The number 
of QTAM buffers per track for the device 
type is computed and stored in the DTF 
table. 


If the Checkpoint Records file is being 
opened, a test is made to determine if the 
DASD Message Queues file was opened 
immediately previous to this file. If it 
was not, an error message is sent and the 
job is cancelled. 


The routine then fetches the Sequential 
Disk Open Input routine ($$BOSDI1), which 
validates and file protects the extent and 
returns control. The routine then posts 
the limits of the extent information to the 
DTF table. 











If the DASD 7772 DCV Vocabulary file or 
the Checkpoint Records file is keing 
opened, the routine exits to Phase 1 of the 
Open Checkpoint/Restart routine (IJLQ03) or 
to the Open IBM 7772 DCV Vocabulary File 
routine (IJLQ07), via a FETCH. 


If the DASD Message Queues file is being 
opened, the extent is checked for 
preformatting. If it is not preformatted 
correctly, an error message is sent and the 
job is cancelled. The routine then tests 
to determine if there are more extents in 
the file. If so, the Sequential Disk Open 
Input routine is fetched to validate the 
next extent. When all extents are 
validated, the routine sets the open bit in 
the DTF and tests cto determine if there are 
additional QTAM files to be opened by this 
OPEN macro instruction. If so, control 
returns to the beginning of the routine. 

If there are no more, control is passed to 
the system Open Monitor via a FETCH. 


If this routine has passed control to 
other QTAM Open modules, it is reentered 
and it passes control back to the system 
Open Monitor. 


External Routines Used: 


FETCH (SVC 2) 


OPEN NONAUDIO LINE GROUP/MS QUEUES ROUTINE 


Module Name: IJLQO2 (Chart 02) 

Entry Point: This routine is brought into 
the transient area and control passed to it 
through a FETCH issued by the QTAM Open 
Monitor routine. The OTAM Open Line 
Group/MS Queues routine is cataloged on the 
Core Image Library under the name $$BOQO002. 
Register 2 contains the address of the DTF 
table being opened. 


Function: Performs initialization 
functions necessary to prepare line group 
and main storage queues files for 
operation. 


The routine first tests to determine 
which file is being opened, and branches to 
the proper subroutine. 


Open Line Group Subroutine: As each line 
group is opened, the address of its DTF 


table is added to the chain of opened DTF 
tables that was started by placing the 
address of the DTF for the DASD Message 
Queues file in the Vector Table. If the 
DTF table is for a remote line group, a 
channel program is built for each line 
consisting of the necessary commands for 
Making the line ready. For nonswitched 


lines, an Enable command is prepared. If 
the TCU type is an IBM 2702, the 
appropriate SAD command is prepared. For 
all other remote lines, a No Op command is 
prepared. After each channel program is 
built, a test is made to determine if a 
Restart is being performed. If it is not, 
the channel program is executed by issuing 
EXCP, followed by a WAIT to await 
completion of the channel program. 


If a Restart is being performed, the 
subroutine adds an additional command to 
the channel program (Read Skip for IBM 
terminals, Break for non-IBM terminals). 
The channel program is executed by issuing 
EXCP, followed by a WAIT. 


Upon completion of the channel progran, 
for a remote line the subroutine issues an 
SVC 31 (QPOST) to post the LCB to itself. 
This causes the line to be scheduled fora 
receiving operation. 


If the DTF table is for an IBM 2260 
Local line group, the terminals are 
prepared for transmission as follows. 
First, the ACLOC field in the DTF table is 
adjusted to the next highest fullword 
boundary, which is the CCB offset in the 
device access area. The LCB for the line 
group is posted to itself, via a QPOST, to 
initialize the Receive Scheduler. If the 
DTF is not being opened for receive 
operations, no further initialization is 
performed, and the routine exits to open 
the next DTF. 


For receive operations, each terminal in 
the polling list is prepared for receiving 
by turning on the ‘receive allowed’ flag in 
the terminal table entry and issuing a NOP 
channel program. When the channel program 
completes, the IBM 2260 Local Appendage 
causes the CCB to remain on the DOS channel 
queue awaiting Attention Interrupts (read 
requests). When all IBM 2260s have been 
enqueued, the routine exits to open the 
next DTF. 


The subroutine now tests if all LCBs in 
this line group have been handled. If not, 
the next LCB address is acquired and 
initialized. If all LCBs have been 
handled, the next DTF address is acquired 
and tested to determine if it is a line 
group file. If it is not, return is made 
to the QTAM Open Monitor routine through a 
FETCH. 


Open MS Queues Subroutine: The address of 
the DTF table for the file is linked into 


the chain from the VECPDOLK field in the 
Vector Table. When an MS Process Queue is 
being opened, the address of the QCB for 
the corresponding DASD Process Queue is 
placed into the DTF table. The address of 
the LCB for the Process Queve (formed in 
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the DIF table for the MS Process Queue) is 
placed into the QSTL field of the QCB for 
the DASD Process Queue. This action 
establishes the interface between the 
message control and message processing 
programs and allows messages to be 
transferred to a processing program in 
response to a GET. Control is returned to 
the QTAM Open Monitor routine through a 
FETCH. 


External Routines Used: 
EXCP (SVCO) 


FETCH (SVC2) 


OPEN CHECKPOINT/RESTART ROUTINE (PHASE 1) 


Module Name: IJLQO3 (Chart 03) 

Entry Point: Entry into this routine is 
from the File Protect subroutine, which is 
called by the QTAM Open Monitor. Phase 1 
of the QTAM Open Checkpoint/Restart routine 
is cataloged on the Core Image Library 
under the name $$BOQ003. Register 2 
contains the address of the DTF table being 
opened. 


Function: Performs initialization 
functions necessary to open the checkpoint 
records file. 


The routine reads the checkpoint control 
record and tests it for correct formatting. 
If it is incorrectly formatted, an error 
message is sent and the job is cancelled. 
If it is formatted correctly, the first 
byte of the record is tested for xX"00‘. If 
it is not X"00", a Restart must be 
performed. The routine sets a bit in the 
checkpoint flag byte in the QTAM vector 
table to indicate that a Restart is being 
performed, reads the proper checkpoint 
record, and issues a FETCH to call in Phase 
2 of the Open Checkpoint/Restart routine. 


If the first byte of the control record 
is equal to X00", the routine goes through 
a scanning loop to compute the size of the 
work area needed to contain the checkpoint 
data. It compares the result with the size 
of the work area specified in the SOWA 
keyword operand and assembled into the DTF 
table. If the work area assembled is too 
small, an error message is sent and the job 
is cancelled. | 


The routine then formats the disk extent 
{as far as necessary) with dummy records. 
Control is returned to the QTAM Open 
Monitor through a FETCH. | 
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OPEN CHECKPOINT/RESTART ROUTINE (PHASE 2) 


Module Name: IJLQO4 (Chart O4) 

Entry Point: Phase 2 of the Open 
Checkpoint/Restart routine is called by 
Phase 1 of the Open Checkpoint/Restart 
routine when it determines that a Restart 
is to be performed. The QTAM Restart 
routine is cataloged in the Core Image 
Library under the name $SBOQO04 and is 
entered for execution at IJLQO4. Register 
2 contains the address of the DTF table. 


Function: Reestablishes the nonaudio 
queues and the telecommunications network 
to the status it had at the time the last 
checkpoint was taken. 


The routine goes through a scanning loop 
to compute the size of the work area needed 
to contain the checkpoint data. It 
compares the result with the size of the 
work area assembled into the DTF table. If 
the work area assembled is too small, an 
error message is sent, and the job is 


cancelled. 


The data in the checkpoint record is 
then used to reinitialize the queues, 
polling lists, terminal table, and LCBs. 
In initializing the LCBs, the routine tests 
to determine if the line is in Send or 
Receive status. If in Send status, the 
Send Scheduler STCB is placed ahead of the 
Receive Scheduler STCB in the LCB. If in 
Receive status, the header of the message 
being received at the time the checkpoint 
was taken is read in from the disk, 
canceled, and written back on the disk. 
Return is made to the QTAM Open Monitor 
through a FETCH. 


External Routines Used: 


Message Writer, Phase 3 (IJLQW3) 
EXCP (SVC 0) 


WAIT (SVC 7) 


OPEN IBM 7772 DCV VOCABULARY FILE ROUTINE 


Module Name: IJLQO7 (Chart 07) 

Entry Point: Entry into this routine is 
from the File Protect subroutine, which is 
called by the QTAM Open Monitor. The OTAM 
Open 7772 DCV Vocabualry File routine is 
cataloged on the Core Image Library under 
the name $$BOQ007. Register 2 contains the 
address of the DTF table being opened. 


ae 


ra 
{ 








Function: 


Performs initialization 
functions necessary to use the 7772 DCV 
Vocabulary file. 


When the 7772 DCV Vocabulary DTF is the 
first opened DTF table, the routine places 
the address of the QTAM Vector Table into 
the DOS communication region. This is 
necessary to allow the cross-partition 
communication required in OTAM. The 
address of this DIF table begins the chain 
of opened DTF tables in the Vector Table 
(VECLDTF field). When the 7772 DCV 
Vocabulary DTF is not the first-opened DTF 
table, the routine checks that the 
previously opened file is the DASD Message 
Queues file, and adds the address of this 
DTF table to the chain of opened DTF 
tables. 


Each DCV buffer in each buffer pool 
associated with the 7772 line group is 
searched. The disk assignment unit order 
of the 7772 DCV Vocabulary file is stored 
in the CCB of each DCV buffer. 


If a word table is provided, the routine 
searches the address of the first 
word-table entry, and the DCV word is read 
from the 7772 DCV Vocabulary file into the 
corresponding WORD macro expansion. This 
procedure is repeated for each DCV word 
required by the user in main storage. 


Control is returned to the QTAM Open 
Monitor through a FETCH. 


External Routines Used: 
FETCH (SVC 2) 


EXCP (SVC 0) 


OPEN AUDIO LINE GROUP/OUTPUT QUEUE FILES 
ROUTINE 


Module Name: IJLQO8 (Chart 08) 

Entry Point: This routine is brought into 
the transient area and control passed to it 
through a FETCH issued by the QTAM Open 
Monitor routine. The QTAM Open Audio Line 
Group/Output Queues routine is cataloged on 
the Core Image Library under the name 
$$BOQ008. Register 2 contains the address 
of the DTF table being opened. 


Function: Performs initialization 
functions to prepare audio line group and 
output queues files for operation. 


The routine first tests to determine 
which file is being opened and branches to 
the proper subroutine. 


Open Audio Line Group Subroutine: When a 
7770 Line Group DTF is the first opened DTF 


table, the subroutine places the address of 
the QTAM Vector Table into the DOS 
communication region. This is necessary to 
allow the cross-partition communication 
required in QTAM. The address of this DTF 
table begins the chain of opened DTF tables 
in the Vector Table (VECLDTF field). When 
a 7770 Line Group DTF is not the first 
opened DTF table, the address of this DTF 
table is added to the chain of previously 
opened DTF tables. 


When a 7772 Line Group DTF is opened, 
the subroutine checks that the 7772 DCV 
Vocabulary file has been opened, and then 
places the address of this DTF table in the 
chain of previously opened DTF tables. 


In any case, the addresses of the 
ARU-Send queue and the QTAM SVC routines 
are placed in the Vector Table. 


As each audio line group is opened, the 
address of the first ALCB is obtained and 
the line table address is stored into the 
VECLTBL field of the Vector Table. The 
address of the line table entry is searched 
and stored in the ALCB. If a 7770 line 
group requires an initial write operation, 
the ALCB channel program is updated with 
the informational or invitational data. In 
any case, the ALCB status is set to ENABLE 
(LSTS=X'01" indicates enable status), and 
the ALCB channel program is executed by 
issuing an EXCP. 


The subroutine then tests if all ALCBs 
in the line group have been handled. If 
not, the next ALCB address is acquired and 
initialized. If all ALCBs have been 
handled, the next DTF address is acquired 
and tested. to determine if it is that of an 
audio line group file. If it is not, 
return is made to the QTAM Open Monitor 
routine through a FETCH. 


Open Audio Output Queues Subroutine: The 


subroutine moves the ARU-Send queue address 
from the VECARUSO field of the Vector Table 
to the Audio Output queue DTF table. The 
address of this DTF table is linked into 
the chain from the VECPDOLK field in the 
Vector Table. Control returns to the OTAM 
Open Monitor routine through a FETCH. 


External Routines Used: 


FETCH (SVC 2) 


EXCP (SVC 0) 
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QTAM CLOSE ROUTINE (PHASE 1) 


Module Name: IJLQOC1 (Chart Ci) 

Entry point: Whenever a OTAM file is to be 
closed, this routine is fetched into the 
logical transient area by the DCS Close 
Monitor and entered at IJLQC1. The QTAM 
Close module is cataloged in the Core Image 
Library under $$BCQC01. Upon entry, 
register 2 contains the address of the DTF 
table for the file being closed. 


Function: Analyzes the type of QTAM file 
to be closed, performs a cleanup action for 
the files used in the message control 
program, and fetches the QTAM Close Phase 2 
for the files used in the message 
processing program. 


When this phase is entered because of a 
CLOSE macro for a type DA, AV, or LG file, 
all line operations have already been 
stopped. Therefore, only minor cleanup 
functions are required to close these 
files. The DTF table for the file being 
closed is removed from the chain of those 
opened, and the open bit is turned off. 
When the type CK file is being closed the 
first byte of the checkpoint control record 
is set to X'00", and it is written onto the 
disk to indicate a proper close. the Ready 
Queue in the QTAM nucleus is reinstated to 
its initial status (that is, the status of 
the Ready Queue at the time the message 
control program phase is loaded to begin 
execution). This action eliminates the 
necessity for an IPL procedure each time a 
QTAM message control program is loaded for 
execution. 


Upon completion of processing, return is 
made to the DOS Close Monitor via a FETCH. 


External Routines used: 
FETCH (SVC 2) 
EXCP (Svc QO) 


Message Writer (Module IJLOMW) 


QTAM CLOSE ROUTINE (PHASE 2) 


Module Name: IJLQC2 (Chart C2) 

Entry Point: This routine is called into 
the logical transient area via a FETCH 
issued by Phase 1 of the QTAM Close 
Routine. Phase 2 of the QTAM Close routine 
is cataloged in the Core Image Library 
under the name $SBCQC0O2. Control is passed 
to this routine at IJLQC2 and upon entry 
register 2 contains the address of the DTF 
table for the file to be closed. 
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Function: Causes a QTAM file opened ina 
message processing program to be closed. 
When the closing of the last PQ, DQ, or AQ 
type file is completed, this routine issues 
a FETCH to call in Phase 3 of the QTAM 
Close routine. 


Because of the nature of OTAM, all PQ, 
DQ, and AQ files opened in any message 
processing programs must be closed before 
the QTAM files in the message control 
program can be closed. 


For a PQ (MS-process), DQ 
(MS-destination), or AQ (Audio Output) 
file, the address of the DTF table is 
removed from the chain of DTF tables 
created at Open time. The chain begins at 
the address of the last PQ, DQ, or AQ table 
opened and is obtained from the VECPDOLK 
field of the QTAM Vector Table. If this is 
a type PQ DIF table, the open bit is turned 
off and the link address to the 
corresponding DASD-process queue is 
destroyed. The iink address to this 
processing queue placed in the QSTL field 
of the QCB for the DASD-process queue at 
Open time is also cleared. The only thing 
required for a type DQ or AQ is to turn off 
the open bit. 


Fach time a type PQ, DQ, or AQ file is 
being closed, this routine tests the 
master-receive switch to determine if a 
closedown procedure is in progress. If so, 
return is made to the DOS Close Monitor. 
But, if there is no closedown procedure and 
if type PQ file operates on audio messages, 
all the audio line group files sending 
messages to the MS-process queue are 
searched from the VECLDTF field of the QTAM 
Vector Table. For each active audio line, 
a special ECB representing a request fora 
Halt I/O operation is posted via a QPOST to 
the LPS queue before issuance of the QWAIT. 
LPS control recognizes the element and 
issues a Halt I/O (Svc 27) on the line to 
break the connection. If necessary, the 
DCV buffer associated with a 7772 line is 
freed by posting it (via an SVC QPOST) to 
the DCV buffer queue from which it has been 
obtained, and control is then returned to 
the DOS Close Monitor. If a closedown 
procedure is indicated, a check is made to 
see if all PQ, DQ, or AQ files in the 
system have been closed (this condition 
exists when the VECPDOLK field contains 
zeros). If not, return is made to the DOS 
Close Monitor. The Close routine goes 
through the chain of DTF table for type DA, 
AV, and LG files (starting at the address 
in the VECLDTF field) to access each line 
in the system. 


For each active nonaudio line, a QWAIT 
(Svc 30) is issued for the LCB to stop all 
operations on the line. If the line is a 
Switched line and is currently connected to 











a terminal, a special ECB representing a 
request for a Halt I/O operation is posted 
via a QPOST to the LPS queue before 
issuance of the QWAIT. LPS control 
recognizes the element and issues a Halt 
I/O (SVC 27) on the line to break the 
connection. Before issuing any QWAITs to 
stop line operations, a switch (actually 
part of the master-receive switch) is set 
which causes each subsequent QWAIT on an 
LCB to have a low priority. This action 
causes all outgoing messages still on the 
destination queue for the line to be sent 
before the QWAIT is staisfied. 


For each active audio line, the end of 
the write operation is expected by testing 
the ALCB status flag (LSTS=X‘'01" indicates, 
at this time, no activity on the line). 


In this manner, all outgoing message 
traffic is flushed before this routine 
releases control. All incoming traffic was 
stopped previously by the Close Message 
Control routine upon issuance of a CLOSEMC 
macro in the message processing program. 


Return is made to the Close Monitor 
unless the file being closed is the last 
QTAM file closed in the message processing 
program(s). In this case Phase 3 of the 
QTAM Close routine is fetched. 


External Routines Used: 
HALT I/O (SVC 27) 


QPOST (SVC 31) 


QWAIT (SVC 30) 


Message Writer (Module IJLQRW) 


FETCH (SVC 2) 


QTAM CLOSE ROUTINE (PHASE 3) 


Module Name: IJLOC3 (Chart C3) 

Entry Point: This routine is called into 
the logical transient area via a FETCH 
issued by Phase 2 of the QTAM Close routine 
when the last PQ, DQ, or AQ file is closed 
from a message processing program. Phase 3 
of the QTAM Close routine is cataloged in 
the Core Image Library under the name 
S$BCQC03. Control is passed to this 
routine at IJLQC3. 


Function: Closed, the Close routine goes 
through the chain of DIF table for type DA, 
AV, and LG files (starting at the address 
in the VECLDTF field) to access each line 
in the system. 


For each active nonaudio line, a QWAIT 
(Svc 30) is issued for the LCB to stop all 
operations on the line. If the line isa 
Switched line and is currently connected to 
a terminal, a special ECB representing a 
request for a Halt I/O operation is posted 
via a QPOST to the LPS queue before 
issuance of the QWAIT. LPS control 
recognizes the element and issues a Halt 
I/O (SVC 27) on the line to break the 
connection. Before issuing any QWAITs to 
stop line operations, a switch (actually 
part of the master-receive switch) is set 
which causes each subsequent QWAIT on an 
LCB to have a low priority. This action 
causes all outgoing messages still on the 
destination queue for the line to be sent 
before the QWAIT is staisfied. 


For each active audio line, the end of 
the write operation is expected by testing 
the ALCB status flag (LSTS=X‘'01" indicates, 
at this time, no activity on the line). 


In this manner, all outgoing message 
traffic is flushed before this routine 
releases control. All incoming traffic was 
stopped previously by the Close Message 
Control routine upon issuance of a CLOSEMC 
macro in the message processing program. 

It performs action to initialize for 
entering the closedown routine in the 
message control program. The address of 
the save area for the F1 partition is 
obtained from the Fi PIB. The return PSW 
in the save area is overlaid with the 
address specified in the EOJAD keyword 
operand of the DTFQT macro instruction for 
the first opened file in the message 
control program. The registers saved by 
the ENDREADY macro expansion are moved from 
the user's save area into the F1 Save area, 
and the QTAM wait flag in the PIB is turned 
off, making the message control program 
eligible for activation. When activated, 
the message control program is entered at 
the EOJAD address, which begins a section 
of code that includes CLOSE macros that 
complete the closing of the type LG, AV, 
and DA files. being closed, the Ready 
Queue in the QTAM nucleus is reinstated to 
its initial status (that is, the status of 
the Ready Queue at the time the message 
control program phase is loaded to begin 
execution). This action eliminates the 
necessity for an IPL procedure each time a 
QTAM message control program is loaded for 
execution. Return is made to the Close 
Monitor. 


External Routines Used: 


FETCH (SVC 2) 
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QTAM AUDIO MESSAGE WRITER ROUTINE 


Module Name: IJLQWA (Chart WA) 

Entry Point: This routine is called into 
the logical transient area by a FETCH 

(Svc 2) issued by the LPS Control routine 
upon recognition of a special audio ECB 
posted to the Ready Queue by the Message 
Writer Initiator routine (IJLQMW). The 
Audio Message Writer is cataloged on the 
Core Image Library under the name SSBOQWTRA. 
Entry to the routine is at IJLQWA. 


The routine tests to determine 
This 


Function: 
what error message is to be written. 
message was registered by the Error 
Recovery Procedures in the Audio Line 
Appendage module (IJLQAA) or the 7772 Disk 
Appendage (IJLQAD). The routine writes the 
message to the system console by issuing an 
EXCP (SVC 0). Upon return, an SVC 11 is 
immediately issued to request return to the 
routine which issued the FETCH. 


External Routines Used: 


EXCP (Svc 0) 


QTAM MESSAGE WRITER ROUTINE (PHASE 1) 


Module Name: IJLQW1 (Chart W1) 

Entry Points: This routine is called into 
the logical transient area by a FETCH 

(Svc 2) issued by the QTAM Open or Close 
routines, or by the LPS Control routine 
upon recognition of a special ECB posted to 
the Ready Queue by the Message Writer 
Initiator routine (IJLOMW). Phase 1 of the 
Message Writer routine is cataloged on the 
Core Image Library under the name S$$BOQWTR1. 
Entry to the routine is at IJLOW1. If 
entry is from the Open or Close routine, 
register 0 contains the message number, 
right-adjusted, and register 2 contains the 
address of the DTF table. 


Function: The routine tests to determine 
what error message is to be written. Ifa 
message to be written was registered by the 
Error Recovery Procedures in the Line 
Appendage module (IJLQLA) or in the Audio 
Line Appendage module (IJLQAA), the routine 
writes the message to the system console 
(or, if the operator control feature is 
specified requesting error messages sent to 
the operator control terminal, to that 
terminal) by issuing an EXCP (SVC 0). Upon 
return, an SVC 11 is immediately issued to 
request return to the routine which issued 
the FETCH. 
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If the message to be written was 
requested by one of the QTAM Open or Close 
routines, the routine calls into the 
logical transient area, via a FETCH 
(Svc 2), either Phase 2 or Phase 3 of the 
QTAM Message Writer, depending upon what 
message is to be written. 


External Routines Used: 
EXCP (SVC 0) 


FETCH (SVC 2) 


QTAM MESSAGE WRITER ROUTINE (PHASE 2) 


Module Name: IJLQW2 (Chart W2) 

Entry Point: This routine is called into 
the logical transient area via a FETCH 

(Svc 2) issued by Phase 1 of the QTAM 
Message Writer routine upon recognition of 
a request for an error message which this 
routine is to write. Phase 2 of the 
Message Writer routine is cataloged on the 
Core Image Library under the name SSBOWTR2. 
Entry to the routine is at IJLQW2. 

Register 0 contains the message number, 
right-adjusted, and register 2 contains the 
address of a DTF table. 


Function: The routine writes error 
messages requested by the QTAM Open or 
Close routines. The message may be 
notification of an invalid Open, an invalid 
Close, an invalid DTFOT, a TERM or LINE 
entry not found, an invalid DCV word 
address, or any of a group of messages 
notifying the operator of errors in the 
extent data. The routine writes the 
message to the system console by issuing an 
EXCP (SVC 0). Upon return, a WAIT (SVC 7) 
is issued to await completion of the 
writing of the message. Upon completion, 
the job is cancelled via a CANCEL (SVC 6). 


External Routines Used: 
EXCP (SVC 0) 
CANCEL (SVC 6) 


WAIT (SVC 7) 


QOTAM MESSAGE WRITER ROUTINE (PHASE 3) 


Module Name: IJLQW3 (Chart W2) 

Entry Point: This routine is called into 
the logical transient area via a FETCH 
(SVC 2) issued by Phase 1 of the QTAM 
Message Writer routine upon recognition of 


e 
. 








a request for an error message that this 
routine is to write. Phase 3 of the 
Message Writer routine is cataloged on the 
Core Image Library under the name S$SSBQWTR3. 
Entry to the routine is at IJLQOW3. 

Register O contains the message number, 
right-adjusted, and register 2 contains the 
address of a DTF table. 


Function: The routine writes any of a 
second group of messages requested by the 
QTAM Open or Close routines, which notify 
the operator of errors in the extent data. 
The routine writes the message to the 
syster console by issuing an EXCP (SVC 0). 
Upon return, a WAIT (SVC 7) is issued to 
await completion of the writing of the 
message. Upon completion, the job is 
cancelled via a CANCEL (SVC 6). 


External Routines Used: 
EXCP (SVC 0) 
CANCEL (SVC 6) 


WAIT (SVC 7) 


OTAM CANCEL ROUTINE (PHASE 1) 


Module Name: IJLOXL (Chart XL) 

Entry Point: If a QTAM Message Control 
Program or Message Processing Program is 
cancelled, this routine is fetched into the 
logical transient area by the DOS 
Terminator Monitor (SSBEOJ) and entered at 
IJLOXL. Phase 1 of the QTAM Cancel routine 
is cataloged on the Core Image Library 
under the name $SBQCNCL. 


Function: If a message Processing Program 
is cancelled, all references to that 
Message Processing Program are purged from 
the Message Control Program and the 
Supervisor. 


Immediately upon entry, two SVC 22s are 
issued to disable the system for I/0 
interrupts. The first SVC 22 seizes the 
system and sets the system mask. The 
second SVC 22 releases the system. A test 
is then made to determine if the Message 
Control Program or a Message Processing 
Program iS being cancelled. If the Message 
Control Program is being cancelled, exit is 
made by fetching S$$BQCNCM, Phase 2 of the 
QTAM Cancel routine. 


This routine is fetched during cancellation 
of a Message Processing Program only for 
abnormal termination of a Message 
Processing Program, or when cancellation is 
requested from the console. 


The return PSW in the program Save area 
is examined to determine if the cancelled 
Message Processing Program was in a QWAIT 
status due to a GET, PUT, or RETRIEVE 
operation. If it is in a QWAIT status, the 
STCB chain of the QCB or BRB being waited 
on is searched to locate the full STCB 
representing reentry to the Message 
Processing Program. When located, the full 
STCB is removed from that chain and reset 
to an inactive status. It is then linked 
to the bottom of the Ready Queue for its 
next usage (otherwise the full STCB would 
be lost). If the item waited on is a BRB 
in the element chain of the Active BRB or 
Disk I/O queue, the BRB is removed from the 
chain and the chain is relinked. 


The remaining cleanup functions are 
performed regardless of whether a QWAIT is 
pending. The chain of Message Processing 
Program DTF tables (starting at VECPDQOLK in 
the Vector Table) is searched for DTF 
tables defined and opened in the cancelled 
Message Processing Program. Each DTF table 
associated with the cancelled program is 
thus found and removed from the chain of 
DTFs. If the DTF table is fora 
MS-destination queue, the “in source chain" 
flag (LALT+2) in the DTF"s LCB is tested to 
determine if a PUT is currently in 
progress. If so, the DTF’s LCB is removed 
from the chain of LCBs currently sending to 
that destination. 


If the DTF table is for a MS-process 
queue, further message transfer to that 
queue is stopped by clearing the QSTL field 
in the corresponding DASD-process QCB. 
Next, any buffers currently associated with 
the DTF table are returned to the QTAM 
buffer pool in the Message Control Program 
to avoid losing them. The last buffer 
passed to the Message Processing Program in 
response to a GET is released by posting 
via an SVC 31 the buffer to the Return 
Buffer queue. Each unprocessed buffer in 
the element chain of the MS-process queue 
is posted to the Available Buffer queue via 
an SVC 31. Additionally, if the EXPEDITE 
option has not been specified for the 
queue, the next disk read address (QNRA 
field in the DASD-process QCB) is reset 
with the relative record number of the 
first unprocessed header segment in the 
MS-process queue. This action causes the 
unprocessed messages to be read from the 
disk queue again if the Message Processing 
Program is reloaded and the DTF table 
reopened. 


The system is enabled for interrupts, 
and exit is made by fetching S$$SBEOJ3. 
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External Routines Used: 
SVC 22 
Svc 2 


QPOST (SVC 31) 


OTAM CANCEL ROUTINE (PHASE 2) 


Module Name: IJLQXM (Chart XM) 


Entry Point: If a QTAM Message Control 
Program is being cancelled, this routine is 
fetched into the the logical transient area 
by Phase 1 of the QTAM Cancel routine and 
is entered at IJLOXM. Phase 2 of the QOTAM 
Cancel routine is cataloged on the Core 
Image Library under the name $SBOCNCM. 


Function: This Cancel phase performs 
cleanup functions for the Message Control 
Program and initiates the cancellation of 
each Message Processing Program in the 
system (if any exists). 


Immediately upon entry, two SVC 22s are 
issued to disable the system for I/O 
interupts. The first SVC 22 seizes the 
system and sets the system mask. The 
second SVC 22 releases the system. Line 
error statistics for each line in the 
system are then printed (via an EXCP) on 
the operator console during this 
cancellation procedure. 


A QTAM Message Processing Program cannot 
run without the Message Control Program. 
Therefore cancellation of each Message 
Processing Program (if any) is initiated. 
The chain of Message Processing Program DTF 
tables created at Open time (starting at 
VECPDOLK in the QTAM Vector Table) is 
searched for the presence of any Message 
Processing Programs in the system. As each 
Message Processing Program is found, a 
cancel flag of X"8163" is set in the PIB 
for that Message Processing Program. This 
action causes the Message Processing 
Program to be cancelled the next time the 
DOS Task Selection mechanism selects that 
program for activation. The QTAM Ready 
Queue in the Supervisor is then reinstated 
to its initial status so that a new copy of 
the Message Control Program can be loaded 
for execution without the necessity for an 
IPL procedure. The QTAM word in the DOS 
communication region is cleared to remove 
any indication of QTAM from the system. 

Two SVC 22s are issued to enable the system 
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Function: 


for interrupts, and exit is made by 
fetching SSBEOJ3 for completion of the a 
cancellation procedure. 


External Routines Used: 
Svc 22 

EXCP (SVC 0) 

WAIT (SVC 7) 


SVC 2 


TERMINAL TEST HEADER ANALYSIS ROUTINE 


Module Name: IJLQTM (Charts TM and TN) 
Entry Point: This routine is called into 
the logical transient area via a FETCH 

(Svc 2) issued by the Terminal Test 
Recognition routine. The Terminal Test 
Header Analysis routine is cataloged on the 
Core Image Library under the name SSBOHDCK. 
Entry is at IJLQTM21. The address of a 
parameter list is passed in register 0. 


Performs preliminary validation 
of the test request, translates the input 
message as necessary, and sets up the / 
terminal addressing characters. \ 


The input message is located, and any 
translation necessary is performed. 
Translations that may be needed are for 
symbolic addresses of terminals and 
translation between ASCII and EBCDIC. 


The proper terminal addressing 
characters, the address of the LCB, and the 
device type and features are placed in the 
buffer prefix. 


The proper Terminal Test routine is then 
called into the logical transient area via 
a FETCH. 

External Routines Used: 

FETCH (SVC2) 

Terminal Test Module for IBM 1030 (IJLOT1) 
Terminal Test Module for IBM 1050 (IJLOT2) 
Terminal Test Module for IBM 1060 (IJLOT3) 
Terminal Test Module for IBM 2260 (IJLOT4) 


Terminal Test Module for IBM 2740 (IJLOT5) 








TERMINAL TEST MODULE FOR IBM 1030 


Module Name: IJLOT1 (Chart T1) 


Entry Point: This routine is called into 
the logical transient area via a FETCH 

(Svc 2) issued by the On-Line Terminal Test 
Header Analysis routine. The Terminal Test 
Module for IBM 1030 is cataloged on the 
Core Image Library under the name $$BQ1030. 
Entry is at IJLQT1. Register 0 contains 
the address of a parameter list. 


Function: Generates channel program for 
IBM 1030 on-line tests. 


The input message is located and the 
header is validated. The header is 
analyzed for type of request. CCWs for the 
proper data and control purposes are formed 
in a special area defined for this purpose. 
(If the buffer can be utilized, the CCWs 
are formed in the text area of the buffer.) 
If the requested data pattern is not in 
use, the pattern is moved into a new area. 
If the new area iS not available, the test 
request is deferred for later processing. 
If the request is for a stored data 
comparison and the data is not correct, the 
input message is switched. Return is to 
the Terminal Test Recognition routine. 


External Routines Used: None. 


TERMINAL TEST MODULE FOR IBM 1050 


Module Name: IJLOT2 (Chart T2) 

Entry Point: This routine is called into 
the logical transient area via a FETCH 

(Svc 2) issued by the On-Line Terminal Test 
Header Analysis routine. The Terminal Test 
Module for IBM 1050 is cataloged on the 
Core Image Library under the name $$BQ1050. 
Entry is at IJLOQT2. Register 0 contains 
the address of a parameter list. 


Function: Generates channel program for 
IBM 1050 on-line tests. 


The input message is located and the 
header is validated. The header is 
analyzed for type of request. cCCWs for the 
proper data and control purposes are formed 
in a special area defined for this purpose. 
(If the buffer can be utilized, the CCWs 
are formed in the text area of the buffer.) 
If the requested data pattern is not in 
use, the pattern is moved into a new area. 
If the new area is not available, the test 
request is deferred for later processing. 
If the request is for a stored data 


External Routines Used: 


Module Name: 


Entry Point: 


External Routines Used: 


comparison and the data is not correct, the 
input message is switched. Return is to 
the Terminal Test Recognition routine. 


None. 


TERMINAL TEST MODULE FOR IBM 1060 


TJLOT3 (Chart T3) 


This routine is called into 
the logical transient area via a FETCH 

(SVC 2) issued by the On-Line Terminal Test 
Header Analysis routine. The Terminal Test 
Module for IBM 1060 is cataloged on the 
Core Image Library under the name $$BQ1060. 
Entry is at IJLQT3. Register 0 contains 
the address of a parameter list. 


Function: Generates channel program for 
IBM 1060 on-line tests. 


The input message is located and the 
header is validated. The header is 
analyzed for type of request. CCWs for the 
proper data and control purposes are formed 
in a special area defined for this purpose. 
(If the buffer can be utilized, the CCWs 
are formed in the text area of the buffer.) 
If the requested data pattern is not in 
use, the pattern is moved into a new area. 
If the new area is not available, the test 
request is deferred for later processing. 
If the request is for a stored data 
comparison and the data is not correct, the 
input message is switched. Return is to 
the Terminal Test Recognition routine. 


None. 


TERMINAL TEST MODULE FOR IBM 2260 


Module Name: IJLOT4 (Chart T4) 

Entry Point: This routine is called into 
the logical transient area via a FETCH 

(Svc 2) issued by the On-Line Terminal Test 
Header Anaylsis routine. The Terminal Test 
Module for IBM 2260 is cataloged on the 
Core Image Library under the name $$BQ2260. 
Entry is at IJLQT4. Register 0 contains 
the address of a parameter list. 


Function: Generates channel program for 
IBM 2260 on-line tests. 


The input message is located and the 
header is validated. The header is 
analyzed for type of request. CCWs for the 
proper data and control purposes are formed 
in a special area defined for this 
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purpose.(If the buffer can be utilized, the 
CCWs are formed in the text area of the 
buffer.) If the requested data pattern is 
not in use, the pattern is moved into a new 
area. If the new area is not available, 
the test request is deferred for later 
processing. If the request is for a stored 
data comparison and the data is not 
correct, the input message is switched. 
Return is to the Terminal Test Recognition 
routine. | 


External Routines Used: None 


TERMINAL TEST MODULE FOR IBM 2740 


Module Name: IJLQOT5S (Chart T5) 

Entry Point: This routine is called into 
the logical transient area via a FETCH 

(Svc 2) issued by the On-Line Terminal Test 
Header Analysis routine. The Terminal Test 
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Function: 


Module for IBM 2740 is cataloged on the 
Core Image Library under the name $S$BQ2740. 
Entry is at IJLQT5. Register 0 contains © 
the address of a parameter list. 


Generates channel program for 
IBM 2740 on-line tests. 


The input message is located and the 
header is validated. The header is 
analyzed for type of request. CCWs for the 
proper data and control purposes are formed 


in a special area defined for this purpose. 


(If the buffer can be utilized, the CCWs 
are formed in the text area of the buffer.) 
If the requested data pattern is not in 
use, the pattern is moved into a new area. 
If the new area is not available, the test 
request is deferred for later processing. 
If the request is for a stored data 
comparison and the data is not correct, the 
input message is switched. Return is to 
the Terminal Test Recognition routine. 


External Routines Used: None. 











The QTAM SVC/Subtask Control routine is 
included in the DOS Supervisor at System 
Generation to handle interrupts caused by 
the issuance of a QTAM Svc (SVC 30 or SVC 
31) and to control the dispatching of QTAM 
subtasks. This supervisory routine 
consists of nine subroutines which are 
summarized below. (See Charts QW, OX, OY.) 


ENTRY INTERFACE SUBROUTINE 


This subroutine is entered from the SVC 
Interrupt Handler of the Supervisor 
whenever a QTAM SVC (QWAIT or QPOST) is 
issued. This subroutine performs 
initialization functions for the QOTAM 
SvC/Subtask Control routine. 


Associated with each entry to this 
subroutine is a Program Information Block 
(PIB). One PIB per partition is 
pre-assembled into the DOS Supervisor, and 
the address of the PIB associated with the 
partition from which the SVC was issued is 
passed (in register 10) to the Entry 
Interface subroutine. This PIB contains 
information about the partition and 
includes: 


1. a ready/waiting flag; and 


2. the address of the program Save area 
where registers and the return program 
status word (PSW) are stored. 


The program issuing the QTAM SVC is 
represented to the SVC/Subtask Control 
routine by a full STCB. One full STCB per 
partition (or task when support for 
multitasking is included) is pre-assembled 
into the QTAM SVC/Subtask Control routine 
for this purpose. These full SICBs are 
initially in an inactive state and are 
linked into the STCB chain of the pseudo 
QCB labeled QSVCQCB. 


When the Entry Interface subroutine is 
entered, it obtains an inactive full STCB 
and initializes it to represent re-entry to 
the program requesting service when the 
request has been satisfied. The full STCB 
to be used for this purpose is always the 
first STCB in the STCB chain of the last 
QCB dispatched by the QTAM SVC/Subtask 
Control routine. The address of this “last 
dispatched QCB" is obtained from the 
location labeled QSVCSAVE and is initially 
the address of the pseudo QCB (QSVCQCB). 


OTAM SVC/SUBTASK CONTROL ROUTINE 


The initialization functions performed 
by the subroutine are: 


1. Saves registers and the old SVC PSW in 
the save area pointed to by the PIB 
(this is accomplished via a branch and 
link to the supervisor's generalized 
Save routine, SVEREG). 


2. Saves all registers (7 through 6) in 
the OTAM save area. 


3. Inserts the PIB address into the full 
STCB (the full STCB contains the 
address of QTAMs dummy PIB when not 
initialized). Cancel exit when no 
STCB available. 


4. ASSigns a priority to the full STCB. 


5. Sets a wait flag in the PIB so that 
the program associated with the PIB is 
not selected for re-activation by the 
task selection mechanism of the DOS 
Supervisor. 


After these initialization functions are 
performed, the Entry Interface subroutine 
exits to the QTAM Wait or Post Subroutine, 
depending on which SVC has been issued. 


QTAM POST SUBROUTINE 


The Post subroutine is entered from the 
Entry Interface subroutine when an SVC 31 
(QPOST) has been issued. Three nonaudio 
implementation routines (Interim LPS, BRB 
Ring, and Line Appendage routines) and 
three audio implementation routines (7772 
Disk Read, 7772 Line Write, and Audio Line 
Appendage routines) enter this subroutine, 
via a direct branch, to cause an effective 
post. Entry is always at QSVCPOST. Upon 
entry, register 1 contains the address of 
an element and register 2 contains the 
address of the QCB to which the element is 
to be posted. 


The Post subroutine places the address 
of the passed QCB into the QCB address 
field of the specified element control 
block. This is the means by which an 
element becomes associated with a OCB. 
This subroutine then branches to the 
Priority Search subroutine to cause the 
element to be placed in the Ready Queue in 
priority order. 
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OQTAM WAIT SUBROUTINE 


The Wait subroutine is entered at QSVCWAIT 
from the Entry Interface subroutine when an 
SVC 30 (QWAIT) has been issued. Upon 
entry, register 2 contains the address of 
the QCB from which an element is requested 
by the SVC. Register 9 contains the 
address of the last QCB dispatched on the 
previous entry into the QTAM SVC routine. 
The first STCB in the subtask chain of this 
last-dispatched QCB is the full STCB 
representing re-entry (when the wait 
condition is satisfied) to the program that 
issued the SVC. 


The Wait subroutine determines what 
disposition is necessary to schedule the 
waiting program (represented by the full 
STCB) for re-activation. Depending on 
current conditions, any one of four 
possible courses of action may be 
necessary. 


1. If the highest-priority STCB in the 
Subtask chain of the QCB specified by 
the SVC is “not waiting™ (QKEY=2), 
this subroutine branches immediately 
to the Defer-Entry subroutine at 
CSVCUNAV. Reasons for this branch are 
explained in the discussion of that 
subroutine. 


2. If the specified QCB has an element 
available on its ECB chain, the 
element is removed from the chain and 
its address placed into parameter 
register one. The Wait subroutine 
then branches to the Exit Select 
subroutine at QSVCRTNX. This branch 
causes the full STCB to be selected 
for activation. Control is thus 
returned (via the DOS Supervisor) to 
the program that issued the SVC 30 
with the address of the requested 
element in register 1. 


The net effect is that at the time 
the program requesting an element is 
dispatched, its full STCB still 
appears in the subtask chain of the 
last-dispatched QCB; however, the 
element chain from which it is drawing 
elements is that of the QCB specified 
by the requesting program. This 
action insures immediate satisfaction 
of the wait condition when the 
requested element is available. 


3. If the specified QCB has no elements 
available, but the last-dispatched OCB 
and the QCB specified by the 
requesting program are the same, the 
STCB iS already chained into the 
correct QCB and the OCB is already 
waiting on the Ready Queue. The Wait 
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subroutine branches to the Qdispatch 
subroutine. 


4. If the specified QCB has no elements 
available and is not the 
last-dispatched QCB, the Wait 
subroutine branches to the Defer-Entry 
subroutine at QSVCUNAV. This action 
causes the full STCB to be removed 
from the subtask chain of the 
last-dispatched QCB, and linked (by 
priority) into the subtask chain of 
the specified QCB so that it can be 
dispatched when an available element 
is posted to the specified QCB. 


The Wait subroutine is also entered at 
the special entry point, QSVCTSTQ, by the 
BRB Ring routine in the Implementation 
module. A detailed discussion of the 
reasons for this special entry appears in 
the description of that routine. Briefly, 
this determines if the last-dispatched QCB 
and a QCB specified by the calling routine 
are the same. Disposition is the same as 
just described in item 3 or 4. The main 
thing here is that the item being 
manipulated is an LCB rather than a full 
STCB, 


PRIORITY SEARCH SUBROUTINE 


The Priority Search subroutine is entered 
at OSVCPRI: 


1. from the OTAM Post subroutine or the 
Defer-Entry subroutine; 


2. when the Queue Insert by Priority 
subtask is dispatched; or 


3. by a direct branch from the End of 
Poll Time Delay or Active Buffer 
Request routine in the Implementation 
module. 


This subroutine performs the generalized 
function of determining the position within 
a chain that an item should assume to be in 
correct priority sequence. Items in the 
chain are arranged in descending order of 
priorities from the top of the chain. The 


subroutine acts on all chains including the 


Ready Queue. 


Upon entry, register 9 points to the 
head of the chain, and register 1 contains 
the address of the item to be ordered 
within the chain. The item to be ordered 
may be an element, an STCB, or a QCB, 
depending on the source of this entry. 


In operation, this subroutine examines 
each item on the chain until it finds 
either an item with lower priority than 











that of the search argument, or the last 
item on the chain (signalled by a priority 
of 255). When either condition is met, the 
subroutine exits to the Queue Insert 
subroutine which actually inserts the item 
into the chain. 


UEUE INSERT SUBROUTINE 


The Queue Insert subroutine is entered at 
OSVCLIFO: 


1. from the Priority Search subroutine; 


2. when the Queue Insert subtask is 
dispatched; or 


3. Via a direct branch from the Available 
Buffer, Buffer-BRB, or Disk I/O 
routine. 


This subroutine performs the generalized 
function of Linking an item into a chain. 
It is applied to all chains including that 
of the Ready Queue. The point of insertion 
is the head of the chain except when this 
subroutine is entered from the Priority 
Search subroutine, which selects the 
insertion point according to the priority 
of the item. 


When this subroutine is entered, 
register 1 contains the address of the item 
to be inserted. Register 9 points to the 
link address field of the item already in 
the chain which the new item is to follow. 
The link address field of the item already 
in the chain is placed into the new item 
and is replaced by the address of the new 
item. This subroutine then exits to the 
Qdispatch subroutine for handling of the 
item currently at the head of the Ready 
Queue. 


DEFER-ENTRY SUBROUTINE 


The Defer-Entry subroutine is entered at 
OSVCUNAV either: 


1. from the QTAM Wait subroutine or the 
Qdispatch subroutine, or 


2. Via a direct branch from the Send 
Scheduler or Receive Scheduler routine 
in the Implementation module. 


This subroutine causes the activation of 
a subtask to be deferred. Which subtask is 
being deferred and the reason depends on 
the source of entry into this subroutine. 
If entered from the QTAM Wait subroutine, 
re-entry to the program that issued an SVC 


QWAIT is deferred because the element 
requested is not yet available. If entered 
from the Send Scheduler routine, the Send 
Scheduler subtask for a nonswitched line is 
deferred because the line is not currently 
available for sending. 


When one of the preceding routines 
encounters an STCB for a subtask that 
cannot be activated, a branch to the 
Defer-Entry subroutine is taken. Upon 
entry, register 9 contains the address of 
the QCB in which the STCB was encountered; 
register 2 contains the address of a OCB 
specified by the calling routine. This 
subroutine removes the STCB from the STCB 
chain of the QCB in which it appears, and 
branches to the Priority Search subroutine. 
This causes the removed STCB to he placed 
(by priority) into the STCB chain of the 
OCB specified by the calling routine. 


An exception arises if the QKEY field of 
the QCB specified by the calling routine is 
2. This condition indicates that the 
highest-priority subtask on the STCB chain 
of that QCB is a ready subtask, that is, a 
subtask not waiting for elements, and is 
ready to receive control. The STCB being 
processed, however, is not ready. If it is 
of higher priority than the ready subtask, 
it cannot be placed at the head of the STCB 
chain without pre-empting the ready status 
that applies to the current top STCB. For 
maximum efficiency, the ready STCB should 
be honored first. Therefore, this 
subroutine enters the Priority Search 
subroutine by a path that insures that the 
new STCB is queued by priority order below 
the current top STCB. 


ODISPATCH SUBROUTINE 


This subroutine is entered at QSVCDISP: 


1. from the Queue Insert subroutine or 
the QOTAM Wait subroutine; 


2. when the Qdispatch subtask is 
dispatched; or 


3. via a direct branch from numerous 
routines in the Implementation module 
Or in the Audio Line Appendage Module. 


The Qdispatch subroutine performs the 


rimary internal management function within 
QOTAM. This subroutine maintains continuity 
by receiving control from a completed 
subtask and selecting the next subtask 
which is to receive control, except for 
those cases in which another subroutine is 
able to determine the subtask to be 
activated next (for example, when the Wait 
subroutine finds that an element is 
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already available for a full subtask 
requesting the element and that the 
Qdispatch subroutine can be bypassed). 


In most cases, when a QTAM subtask has 
completed its unit of work or is unable to 
perform its unit of work (for example, if 
the Send Scheduler subtask is dispatched to 
initiate sending on a line that is 
designated as an input only line), entry is 
made into the Qdispatch subroutine for 
handling of the item currently at the head 
of the Ready Queue. This entry may be 
either direct, that is, by a direct branch, 
Or indirect. An indirect entry occurs when 
a subtask branches to some other subroutine 
in the SVC/Subtask Control routine, and 
that subroutine, in turn, causes entry into 
the Qdispatch subroutine. No parameters 
are passed. 


In operation, this subroutine examines 
the item currently at the head of the Ready 
Queue (location QSVCRDYQ) and takes the 
appropriate action, depending on the type 
of item encountered. Items that can appear 
on the Ready Queue are: 


1. Queue Control Blocks (QCB) for which 
the highest-priority subtask is not 
waiting for elements (QKEY = 2) and is 
ready to be dispatched. 


2- Queue Control Blocks for which the 
highest-priority subtask is waiting 
for elements (QKEY = 3) and cannot be 
dispatched. 


3. Element Control Blocks (ECB), 
containing the address of the QCB to 
which the element (Buffer, BRB, or 
LCB) has been posted (ECB key is 0). 


4. Full STCBs for which the key value 
(SKEY) is also zero. The first word 
of a full STCB always contains the 
address of the pseudo QCB labeled 
QSVCQOCB. 


The explanation of the effect of the 
appearance of each type of item at the head 
of the Ready Queue follows. 


Queue Control Block -- Not Waiting (QKEY is 
2): When the item at the head of the Ready 


Queue is a “not waiting" QCB, this 
subroutine exits to the Exit Select 
subroutine at QSVCBD. This causes control 
to be given to the first (highest priority) 
Ssubtask represented in the STCB chain of 
that QCB and the QCB becomes a "waiting" 
QCB (QKEY is set to 3). 


Queue Control Block -- Waiting (QKEY is 322 
When a “waiting™ QCB appears at the head of 


the Ready Queue, it is removed from the 
Ready Queue and its key is set to1. The 
QCB is replaced at the head of the Ready 
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Element Control Block: 


Queue by the item to which it linked. A 
branch is made to the beginning of the 
Qdispatch subroutine for examination of the 
new item. 


A QCB waiting for elements cannot 
contend for control; however, it will 
automatically be returned to the Ready 
Queue when an element becomes available. 


An element control 
block appears on the Ready Queue as a 
result of an SVC 31 (QPOST) and contains 
the address of the QCB for the queue to 
which the element has been posted. When an 
element reaches the top of the Ready Queue, 
it is immediately replaced by the next item 
on the Ready Queue. However, the QCB 
pointer in the element control block is 
retained. That OCB is then treated as 
though it, rather than an element 
associated with it, had been encountered; 
its highest priority subtask is activated, 
and its key is set to 3. 


This convention has several significant 
aspects: 


1. It is the means by which a removed 
waiting QCB is returned to the Ready 
Queue. 


2. It illustrates the case where the 
active OCB, that is, the OCB with 
which the active subtask control block 
is associated, is not necessarily at 
the head of the Ready Queue. 


3. It explains that an element control 
block need not be physically chained 
into a QCB to become associated with 
that QCB. Specifically, it ensures 
that an element is immediately acted 
upon, except in the case where the 
queue involved already has at least 
one other “real™ element and is 
already contending for computing time. 


Full Subtask Control Block: This is the 


only form of STCB that appears on the Ready 


Queue. Its appearance at the head of the 
Ready Queue has exactly the same effect as 
the appearance there of a “not waiting" 
(key is 2) QCB with this STCB at the head 
of its STCB chain. The subtask is 
activated and the key of the QCB with which 
it is associated (QSVCOCB) is set to 3. 


The mechanism by which this is 
accomplished is as follows: 


1. Location QSVCRDYQ contains a pointer 
to the full STCB. 


2. The full STCB itself has the 
appearance (to the Qdispatch 
subroutine) of an element. 
address iS QSVCQOCB. 


Its QCB 


a 


/ 


NS 











3. QSVCQCB is a storage location 
equivalent to QSVCRDYO minus 8 bytes. 
It also appears to be the first word 
of a “not waiting™ OCB. 


4. Because the full STCB is apparently an 
element control block associated with 
a “not waiting" QCB, the first STCB in 
the chain of that QCB should be 
selected for activation. The address 
of the first STCB is found in the 
third fullword of the QCB. 


5. The third fullword of QSVCOCB which 
appears as a QCB is the location 
OSVCRDYO. Therefore, the full 
subtask, whose address is at QSVCRDYOQ, 
is selected for control. 


EXIT SELECT SUBROUTINE 


This subroutine activates OTAM subtasks 
represented by truncated STCBsS or exits to 
the Exit Interface subroutine if the STCB 
is a full STCB. | 


The first byte of a truncated STCB is 
the entry code field and is a branch 
modifier of the form (entrypt-NRET), where 
entrypt is the address of the desired entry 
point. NRET is the location from which the 
branch offset is applied. When the Exit 
Select subroutine encounters a nonzero 
entry code, it computes the branch address 
and branches to the computed entry point in 
the QTAM Implementation module (IJLQIP). 


If the entry code is zero, the STCB is a 
full STCB representing re-entry to a 


program that issued a QTAM Svc. [In this 
case, this subroutine exits to the Exit 
Interface subroutine. 


EXIT INTERFACE SUBROUTINE 


This subroutine is entered from the Exit 
Select subroutine to process full STCBs. 
Before any other action is taken, the 
subroutine determines whether the problem 
program is being scheduled for activation 
because it was represented in the STCB 
chain of a waiting QCB for which an element 
has been encountered. If this condition 
exists, the address of the element is 
placed in parameter register 1 and the 
register stored in the save area of the 
partition associated with the full STCB 
being processed. The address of the save 
area is obtained from a PIB, the address of 
which has previously been inserted into the 
STCB. 


Before control is returned to the DOS 
Supervisor, several functions are 
performed. The wait flag is removed from 
the PIB. This action indicates to the 
Supervisor that the requested service has 
been completed and the program issuing the 
Svc can be reactivated. The registers are 
restored from the save area. The full STCB 
being used is restored to an “unused, 
available" state by removing the PIB 
address from the STCB. After these 
functions are complete, the Exit Interface 
subroutine branches to the Supervisor 
General Exit routine for eventual re-entry 
to the program issuing the SVC. 
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OTAM IMPLEMENTATION ROUTINES 


The routines in this section, together with 
those in the Line Input/Output section, 
perform the primary functions necessary for 
the implementation of QTAM. These routines 
are in the QTAM Implementation module 
(IJLQIP), with the following exceptions: 


e The Disk-End Appendage and the Disk I/O 
routine, which are packaged in the Disk 
I/O module (IJLQDA). 


e The 7772 Disk-End Appendage, the Disk 
Read routine, the Line Write routine, 
and the DCV Buffer routine, which are 
packaged in the 7772 Disk Appendage 
module (IJLQAD). 


Note that the greatest amount of QOTAM 
audio implementation is performed in the 
routines packaged in the Audio Line 
Appendage module (IJLQAA) described in the 


Line Input and Output section. 


As previously stated, all but three of 
these routines are supervisory routines 
which execute as a logical extension of the 
QTAM SVC/Subtask Control routine. The 
three routines in the Implementation module 
which run in problem program state are the 
LPS Control, Buffer Recall/Cleanup, and 
Free BRB routines. These routines provide 
the interface between the supervisory 
routines and the remainder of the message 
control problem program. 


RECEIVE SCHEDULER ROUTINE (CHART 00) 


This routine is entered at RCVSCH when the 
Receive Scheduler subtask is activated. 
This subtask is activated when the LCB 
(Communication Line QCB) appears at the top 
of the Ready Queue with the STCB for the 
Receive Scheduler at the head of its STCB 
chain. 


Several tests are made to determine if 
receiving operations are to be initiated on 
the line represented by the LCB. If the 
Status byte in the polling list for the 
line is zero, or if the 
mMaster-receive-switch is off (system close 
is in process), receive operations are not 
initiated. If the LCB is for an IBM 2260 
Local line group and no CCB has been posted 
to the Attention queue for the line group, 
receive operations are not initiated. In 
all cases, exit is made to the Exit Select 
subroutine at QSVCREIN to dispatch the next 
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subtask in the STCB chain of the 

Communication Line QCB. The next subtask 
will normally be the line's Send Scheduler 
subtask, if any, or the Qdispatch subtask. 


An exception arises if the next STCB is 
a full STCB representing a waiting problem 
program. If this is the case, the waiting 
program cannot be reactivated because the 
Svc it issued has not been satisfied. 
Therefore, the LCB is removed from the 
Ready Queue and exit is made to the 
Defer-Entry subroutine at QSVCUNAV to 
remove the full STCB from the STCB chain. 


For remote terminals, this routine then 
examines the current polling list entry for 
the line. If the current entry is valid 
(that is, it is not the dummy entry 
Signalling the end of the polling list), 
exit is made to the BRB-Ring routine at 
RQCONSTR to initialize for receiving. If 
the end of the polling list has been 
detected, the current entry pointer (LPPT 
field in LCB) is reset to the first entry 
in the list and exit is made to the End of 
Poll Time Delay routine. This causes fo 
either a polling interval to be observed or 
rescheduling of polling on the line. 


For the LCB for. an IBM 2260 Local line 
group in which a CCB is found in the 
Attention queue, the CCB is removed and the 
next CCB (if any) is promoted to the top of 
the queue. The address of the removed CCB 
is saved in the LCB, and the Attention 
Queue flag in the terminal table entry for 
the IBM 2260 Local is turned off. Exit is 
made to the BRB-Ring routine to continue 
initialization for a read operation. 


If the line is a WITA line, the Receive 
Scheduler routine tests the EOT flag in the 
LWITT field of the LCB. If this flag is on, 
exit is made to the Exit Select subroutine 
to enter the Send Scheduler subtask of the 
line, if present. If the EOT flag is off, 
exit is made to the BRB-Ring routine at 
ROCONSTR to initialize for receiving. 


Note: A possible endless loop is 

circumvented by a test to determine that 

the polling list contains at least one 

active entry. If the list contains no 

active entry, the exit to the End of Poll 
Time Delay routine is not taken. Instead, 

the Receive Scheduler subtask is skipped 

over in the STCB chain, and control is 

passed to the second subtask in the chain / 
via a branch to the Exit Select subroutine. — 











SEND SCHEDULER (CHART 1) 


This routine is entered when an LCB appears 
at the top of the Ready queue with the Send 
Scheduler STCB at the head of its STCB 
chain, or when a message is to be written 
on the disk. If a message is to be written 
on the disk, the routine links to the DASD 
Destination routine at SCREEN to cause a 
post to the Disk I/O QCB. 


If the DTF table has not been opened for 
output or the relative line numker is 
greater than the number of extents, the 
routine branches to the Qdispatch 
Subroutine. If the DIF table is open for 
output and this is a dial line, the routine 
tests for the availability of an access 
line. If it is not available, it looks at 
the next access line. If an access line is 
available, it disables the line to make it 
unavailable for incoming traffic. 


If the DTF table is open for output and 
this is a WITA line, the Send Scheduler 
routine tests whether data is being 
received. If so, control is returned to 
the Defer Entry subroutine at QSVCUNAV. If 
not, the line is disabled to be available 
for outgoing traffic. 


If the line is nondial or non-WTTA, it 
is set to indicate the line is trying to 
send. If the line is not free, a branch to 
the Defer-Entry subroutine is made. If the 
line is free, the LCB is linked to the top 
of the Ready queue to cause the Send 
Scheduler subtask to be activated for line 
operations. 


If the routine was entered because the 
LCB was on top of the Ready queue, the 
routine tests for an incoming priority 
message. If there are no completed 
nonpriority messages and if initiate mode 
has been specified, or if priority messages 
are coming in, the LCR is removed from the 
source chain. If neither an initiate mode 
nor sending is indicated in the LSTA field, 
the status of the LCB is cleared. If a 
partial message is in the queue (an invalid 
condition), the routine branches to the 
Wait subroutine. After the status code is 
set, the routine exits: 


1. if entered via the Get Scheduler, 
return is to that routine, or 


2. if the line is sending, the routine 
branches to the BRB-Ring routine at 
RQCONST. 


END OF POLL TIME DELAY ROUTINE (CHART 2) 


This routine has three entry points: 


1. At DELAY, from the Receive Scheduler 
routine when the end of the polling 
list for a nonswitched line is 
detected. Upon entry, register 4 
contains the address of the LCB 
representing the line for which a 
polling pass has been completed. 


2. At TIMEEXIT, from the DOS Interrupt 
Handler whenever a timer interruption 
occurs. This entry is established by 
a STXIT macro issued in the LPS 
Control routine prior to setting of 
the timer. 


3. At TIMEEND+6, when the Time Delay 
subtask is dispatched upon the 
appearance of the Time Delay QCB at 
the top of the Ready Queue. 


When entry is at DELAY from the Receive 


Scheduler routine, a test determines if any 
messages were received during the polling 
pass just completed. If messages were 
received, a direct branch is made to the 
Priority Search subroutine in the QTAM 
nucleus. This causes the line to be 
rescheduled for polling as follows: the 
Receive Scheduler STCB is inserted into the 
STCB chain of the Communication Line QCB 
according to its priority relative to the 
priority of any Send Scheduler STCB already 
in the chain. Polling on the line resumes 
when the Communication Line QCB (the LCB) 
appears at the top of the Ready Queue with 
the Receive Scheduler STCB at the head of 
its STCB chain. 


If no messages were received, the 
interrupt request time (current time plus 
user-specified polling interval) is 
calculated and placed in the LBCT field of 
the passed LCB. The interrupt request time 
is then used as the search argument for 
chaining the LCB into its proper position 
in the Time Delay queue relative to the 
interrupt request times of other LCBs 
already in the queue. 


After the current LCB is inserted into 
the Time Delay queue (or when entry is due 
to activation of the Time Delay subtask), 
the current time is subtracted from the 
interrupt request time stored in the LCB at 
the top of the Time Delay queue. The 
result is tested to determine the required 
course of action: 


1. If the result exceeds zero, that is, 
the interrupt request time is later 
than the current time, the calculated 
value is stored for use by the LPS 
Control routine, A special ECB 
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(labeled IP1IREB) representing a 
request for a polling interval is 
posted to the LPS queue via a direct 
branch to the Post subroutine. This 
causes entry into the LPS Control 
routine where a SETIME macro (SVC 10) 
is issued to set the timer for the 
calculated interval. 


2. If the result is less than or equal to 
zero, that is, the current time is 
later than the interrupt request time, 
or an interval of zero was specified, 
a test is made to determine if the LCB 
is the dummy LCB in the checkpoint 
element. If it is the checkpoint 
element, it is removed from the top of 
the Time Delay queue and posted to the 
checkpoint queue to activate the 
checkpoint subtask. A test is made to 
determine if it is a pseudo-LCB passed 
from the Operator Control module. If 
it is, the pseudo-LCB is posted to 
itself to activate the INTREL subtask. 
If it is an LCB, it is removed from 
the top of the Time Delay queue, anda 
direct branch is made to the Priority 
Search subroutine. This causes 
polling on the line to be rescheduled 
aS previously described for the case 
where messages were received during a 
polling pass. If this routine has 
been entered because of dispatching of 
the Time Delay subtask, a test 
determines if the line is free, that 
is, not currently being used for 
sending. If the line is free, the LCB 
is placed at the top of the Ready 
Queue prior to branching to the 
Priority Search subroutine. This 
causes polling on the line to resume 
immediately. 


When a time interruption occurs, the End 
of Poll Time Delay routine is entered at 


OF _ FOts 1ime vesay roucine is _ entered at 
TIMFEXIT from the DOS Interrupt Handler. 
The Time Delay queue is posted to itself 
via a QPOST (SVC 31). This action causes 
the Time Delay subtask (discussion follows) 
to be activated. Upon return from this 
Svc, exit is made to the DOS Interrupt 
Handler so that the program that was 


executing when the timer interrupt occurred 
can become eligible to regain control. 


The End of Poll Time Delay routine is 


entered at TIMEEND+6 when the Time Delay 
subtask is activated. This entry occurs 


when the Time Delay GCB appears at the top 
of the Ready Queue (see QPOST after timer 
interruption just discussed). A test 
determines if there are any LCB‘s currently 
chained into the Time Delay queue. If 
there are, the current time is obtained via 
a GETIME macro and the LCB at the top of 
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the Time Delay queue is handled as 
previously described. If no LCB is in the 
Time Delay queue, exit is made to the 
Qdispatch subroutine for handling of the 
next item on the Ready Queue. 


BRB-RING ROUTINE (CHART 3) 


This routine constructs the BRB ring used 
to send or receive a message, and begins 
initialization of a CCW in each BRB. The 
BRBs are drawn from the element chain of 
the Inactive BRB queue generated on 
expansion of the BUFFER macro instruction. 
The routine attempts to form a ring 
containing the number of BRBs specified in 
the BUFNO parameter of the DTFQT macro 
instruction. 


When the routine is entered, register 9 
is adjusted so that the line control block 
appears to the system to be an STCB. This 
anticipates the situation in which not 
enough BRBs are available to complete the 
Ying. In this case, the LCB is placed on 
the STCB chain of the Active Buffer Request 
queuve (through a branch to QSVCTSTQ in the 
OTAM Wait subroutine). When a BRB is 
posted to that queue, the BRB-Ring routine 
makes another attempt to complete the ring. 
When sufficient BRBS are available, the 
resulting BRB ring consists of a series of 
BRBs, each containing: 


1. ain the third fullword, the 
transfer-in~-channel operation code and 
the address of the preceding BRB/CCW 
in the ring, and 


2. in the fourth fullword, a pointer to 
the LCB for which the ring was 
constructed. 


Because each BRB/CCW contains a 
transfer-in-channel to the previously built 
BRB/CCW, the TIC address in the first 
BRB/CCW iS initially meaningless. The last 
step in completing the ring (if enough BRBs 
were available) is, therefore, to reset the 
first BRB/CCW to transfer-in-channel to the 
last. If the order of construction of a 
four-member BRB/CCW chain was A-B-C-D, the 
order of execution will be ADC B. 


When the BRB/CCW ring is complete, the 
LCB is removed from the location where it 
was encountered as an apparent STCB -- that 
is, from the head of an STCB chain or the 
Ready Queue. Depending upon whether a send 
Or receive operation is being prepared for, 
further initialization is performed. 


eos 











1. The element control block portion of 
the first BRB/CCW is given a priority 
value: 


RECEIVE - X"*EC* 


SEND - X"*EO" 

2. Into the LCB (LOPC field) is inserted 
an operation-type code for subsequent 
use by the Physical I/O module: 


RECEIVE - 1 (Read Initial) 


SEND - 2 (Write Initial) 

3. Register 2 is initialized for the QcB 
for the queue to which the first 
BRB/CCW is to be posted: 


RECEIVE - Active-Buffer-Request Queue 


SEND - Disk Input/Output Queue (for 
send operations, additional 
initialization consists of 
setting a code of X"09" in the 
RSTA field of the BRB and 
inserting the relative record 
number for the first segment 
of the message in the RNSA 
field). 


A test is made to determine if a message 
is to be received from a 2260 Local 
terminal. If not, the routine causes the 
first BRB/CCW in the ring to be posted to 
the appropriate queue by exiting to the 
Post subroutine in the QTAM SVC/Subtask 
Control routine. 


If a message is to be received froma 
2260 Local terminal, additional procedures 
are performed. The entire ring of BRBs is 
linked to the top of the Ready Cueue. Into 
each BRB is placed a high priority (X'EC") 
and the address of the Active Buffer 
Request queue. Exit is made to the 
Qdispatch subroutine in the QTAM nucleus to 
cause requests for ail needed buffers to be 
initiated. This action is necessary 
because all required buffers must be 
assigned before the Read operation (EXCP) 
is initiated in the QTAM Physical I/0 
module. 


ACTIVE-BUFFER-REQUEST ROUTINE (CHART 4) 


This routine is entered at IJLQIP81+6 on 
activation of the Active-Buffer-Request 
subtask. The element passed to the routine 
is an active BRB. The routine determines 
whether a buffer to satisfy the request is 
available and should be assigned, or 
whether the active BRB should be queued for 
later servicing. 


If the active BRB represents the 
beginning of a BRB ring to be used for a 
receive operation, the routine removes a 
buffer from the element chain of the 
Available-Buffer OCB and exits to the 
Buffer~BRB routine. Parameters passed to 
that routine are the address of the active 
BRB, the address of the removed buffer, and 
the address of the Available-Buffer OCB. 


If the active BRB is not the first of a 
ring for a receive operation, or if it is 
the first but no buffer is available, the 
routine branches to the Priority Search 
subroutine to cause the active BRB to be 
queued on the element chain of the Active 
Buffer-Request queue. 


AVAILABLE-BUFFER ROUTINE (CHART 5) 


This routine is entered at BFRREO on 
activation of the Available-Buffer subtask, 
or from the Buffer-BRB routine. The 
routine responds to the availability of a 
buffer by attempting to locate an active 
BRB. If no BRB is active, the buffer is 
chained into the element chain of the 
Available Buffer queue through a branch to 
the Queue Insert subroutine. If a BRB is 
active, this routine branches to the 
Buffer-BRB routine. 


BUFFER-BRB ROUTINE (CHART 6) 


This routine is entered at BFRSCHt+6 from 
either the Active Buffer Request routine or 
the Available Buffer routine. Upon entry, 
register 6 contains the address of an 
active BRB and register 1 contains the 
address of an available buffer. 


This routine makes the appropriate 
disposition of the buffer depending upon 
the status of the BRB. The BRB may be 
associated with any one of three 
operations. 


1. The BRB is associated with a 
read-from-disk operation: This is an 
indication that the BRB was previously 
in the Disk I/O Queue, but that a 
buffer was not available at that time. 
This routine effectively (but not via 
an SVC) posts the BRB to the Disk I/0 
Queue, and exits to the QOTAM 
Svc/Subtask Control routine at 
OSVCLIFO to cause the buffer to be 
posted to the Available Buffer Queue. 
This action ensures that the buffer 
will now be available for the 
read-from-disk operation. 
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2. The BRB is associated with a 
receive-from-line operation: 
determining that the line is still 
available for receiving, the buffer is 
essigned to the line and placed on the 
LPS Queue via an exit to the 
Interim-LPS routine. If the line is 
not available for receiving, this 
routine exits to the Available Buffer 
routine in an attempt to assign the 
buffer elsewhere. 


After 


3. The BRB is associated with a PUT 
operation: This case arises when a 
PUT module in a message processing 
program has requested a buffer via a 
OPOST or QWAIT SVC. This routine 
passes the buffer to a special section 
of the PUT module, which places the 
data into the buffer while executing 
in supervisor state (movement of the 
data must be effected in supervisor 
state so as not to violate storage 
protection). 


INTERIM LPS ROUTINE (CHART 7) 


This routine is entered when the Interim 
LPS QCB (IJLQIP76) appears at the top of 
the Ready queve. This routine provides the 
means of delaying the processing of all 
buffers until all BRBs are processed when a 
PCI interruption is missed because of 
extended CPU disakle time. 


When entered the routine immediately 
posts the buffer passed to it to the LPS 
queue. This causes the LPS Control 
routine, which is waiting for a buffer, to 
be entered for processing of the buffer. 


QMOVER ROUTINE (CHART 9) 


This routine is entered at IJLQIP80+6 upon 
activation of the Qmover subtask. This 
subtask iS activated when the Qmove QCB 
appears at the top of the Ready Queue. 


The Qmover routine moves data from the 
Foreground-2 or Background partition into 
the Foreground-1 partition, while operating 
under the storage protection key of the 
supervisor. The routines associated with 
the CHNGT, CHNGP, COPYC, and CLOSEMC macro 
instructions require this function. The 
function is requested by posting the Qmove 
OCB to itself via a QPOST (SVC 31). 


The routine moves the desired data per 
parameters passed by the requesting 
routine: 


1. register 3 contains the length of the 
data to be moved; 
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2. register 4 contains the address of the 
Fl area into which the data is to he 
moved; and 


3. register 5 contains the address of the 
data to be moved. 


After the data is moved, this routine exits 
to the Qdispatch subroutine for handling of 
the next item on the Ready Queue. The next 
item may be the full STCB representing 
reentry to the requesting program. 


Note: This routine is used in the same way 
in a one-partition processing environment 
(i.e., with multitasking). 


DASD DESTINATION ROUTINE (CHART 10) 


This routine is entered on activation of 
the DASD Destination subtask, or by a 
branch-and-link from the Send-Scheduler 
routine. The latter entry occurs when the 
Send-Scheduling subtask is activated 
because of the availability of a 
message-filled buffer to be written on the 
disk. 


For buffers containing text segments, 
the routine routes a full buffer to the 
Disk I/O Queue and increments the message 
count (unless a CANCEL operation is in 
progress). The LCB for the source line 
~-the line on which the segment now in the 
buffer was received --is removed from the 
source chain in which it previously 
appeared and is linked into the source 
chain for the destination queue. The 
segment™ relative record number is 
calculated and stored, and the routine 
either: 


"next 


i tae returns to the Send-Scheduler routine; 
or 


2. exits to the Qdispatch subroutine. 


GET-SCHEDULER ROUTINE (CHART 11) 


This routine is entered when a buffer has 
been returned from a GET operation or when 
a disk read from a DASD-process queue has 
been completed. The routine makes three 
tests to determine whether the message 
processing program iS ready to accept 
another segment. If 


1. there is no message segment in the 
DASD process queue, 


2. there are too many buffers in the main 
storage process queue for the 
processing program to handle, or 


a 











3. a segment is currently being read from 
the DASD process queue. 


No further disk read can be initiated, 
and this routine exits to the Qdispatch 
routine. 


If none of the three conditions exits, 
the routine initiates a disk read from the 
DASD process queue. 


RETURN-BUFFER ROUTINE (CHART 12) 


This routine returns a buffer from the 
main storage process queue and exits to the 
GET-Scheduler routine to allow resumption 
of disk reads from the DASD process queue. 


END INSERT ROUTINE (CHART 13) 


This routine is entered by a branch and 
link from the End of Address, 
Conversational Mode, or Distribution List 
routine to enter the address of these 
routines in a chain of routines to be 
executed according to the specified 
priority by the Buffer Cleanup Routine. 


The routine compares the priority 
specified in the calling routine with the 
priority that has been set in the End 
Insert Routine. If the priority is less 
than the highest priority routine, the 
priority of the calling routine is compared 
with the next priority routine in the chain 
until the priority is high. 


When the priority is higher than the 
priority of the one already in the chain, 
the address and priority of the calling 
routine are inserted in the constant of the 
higher priority routine in the chain. The 
pointer to the calling routine is adjusted 
to point to the BAL instruction. The 
operand of this instruction in the calling 
routine is overlaid with the constant 
following the BAL instruction. This 
constant contains a register that has been 
set up by the calling routine. To complete 
the chain, the constant is overlaid with 
the address and priority of the lower 
priority routine. This routine branches 
back to the calling routine at the BAL 
instruction. 


LPS CONTROL ROUTINE (CHART 15) 


This routine is entered at IJLQIP20 from 
the expansion of the ENDREADY macro 
instruction during initialization of the 
telecommunications system. Thereafter, it 
is entered at the same entry point from 


numerous implementation routines. The most 


common entries are from: 


1. the Physical I/O module after a line 
I/O operation has been initiated, and 


2. the Free BRB routine after the buffers 
and BRBs for a previous operation have 
been released and the line freed. 


3. the ARU-Internal and ARU-Receive 
routines (packaged in the Audio Line 
Appendage module) after any ARU/LPS 
processing has been completed for a 
line. 


When entered, the routine issues an 
immediate SVC 30 to QWAIT for the next item 
on the LPS queue. The item returned by the 
SVC may be any of the following: 


1. An available buffer into which a 
message segment is to be read. 


2. A buffer containing a header or text 
segment, that is, a message-filled 
buffer, that has been read or is to be 
written. 


3. A special ECB representing a request 
to start a disk I/O operation. 


4. A special ECB representing a request 
to set the timer for a polling 
interval. 


5. A Pause BRB/CCW 


6. An audio line control block into which 
an input message is to be processed by 
the user's LPS routines. 


7. An audio line control block requesting 
an I/O operation. 


8. A 7772 DCV buffer requesting a disk 
read operation from the 7772 DCV 
Vocabulary file. 


9. A special ECB representing a request 
to stop a specified audio line. 


10. A special ECB requesting a Halt I/O on 
a dial line. 


When an available “first" buffer is 
encountered, the routine exits to the 
Activate routine (in module IJLQRW) at 
IJLORW to cause receipt of the message to 
be initiated. When a full buffer or the 
last buffer is encountered, the routine 
exits to the beginning (LPSTART expansion) 
of the user's LPS section. Prior to 
entering either the Activate routine or 
theuser's LPS, the registers are 
initialized as follows: 
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Register 4--address of the appropriate 
LCB. 
Register 5--the scan pointer is set for 


header analysis or for data 
address in read initial 


operation. 
Register 6--address of the buffer. 
Register 7--address of the beginning 


instruction in the user's 


LPS section. 


Register 8--address of the appropriate 
terminal table entry. 
Register 9--end-of-segment address. 


If the item 
I/O operation, 


is a request to start a disk 
the routine loads the 
address of the CCE for disk Operations into 
register 1 and issues an EXCP (SVC 0). The 
necessary channel program was previously 
built by the Disk I/O routine which 
requested that the I/O operation be 
Started. 

For a polling interval request, the 
address of the QTAM timer interrupt 
handling routine (labeled TIMEEXIT) is 
first established via a STXIT macro. 

a SETIME (Svc 10) is issued to set the 
timer for the interval requested by the End 
of Poll Time Delay routine. 


Then 


After either a disk I/O operation has 
been initiated or the timer set, control is 
returned to the beginning of this routine 
(at IJLQIP20) to QWAIT for the next item on 
the LPS queue. 

If the item is a Pause BRB/CCW, exit is 
made to the Pause routine. 


When an audio input message is to be 
processed, the routine exits to the 
beginning (LPSTART expansion) of the 
ARU/LPS section. Before this user's 
section is entered the registers axe 
initialized as follows: 


user's 


Register 4--address of the appropriate 
ALCB. 


Register 7--address of the beginning 
instruction in the user's 
ARU/LPS section. 


If an audio line control block requests 
an I/O operation, the channel program is 
ready and an EXCP (SvC 0) is immediately 
issued on the line. Control returns to the 
beginning of this routine (at IJLOIP20). 


If a 7772 DcCV buffer requests a disk 
read operation, the channel program is 
ready in the buffer itself, and an EXCP is 
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immediately issued to read a DCV word. 
Control returns to the beginning of this 
routine (at IJLQIP20). 


If a special ECB representing a request 
to stop an audio line is encountered, the 
CCB address is extracted from the ALCB and 
a Halt I/O is issued through an SVC 27. 
Control returns to the beginning of this 
routine (at IJLQIP20). 


BUFFER RECALL/CLEANUP ROUTINE (CHART 16, 
17) 


This routine is entered through a branch 
instruction generated on expansion of a 
macro instruction in the problem program. 
The routine performs a cleanup function 
when entered at IJLQIP23 through the 
calling sequence generated by a POSTSEND , 
ENDRCV, or POSTRCV macro instruction. The 
recall function is performed when entry is 
at IJLQIP22 through the calling sequence 
from the Cancel Message, EOBLC, Error 
Message, Reroute Message, EOA, or 
Distribution List routines. The difference 
between the two entry paths is that in the 
second case the recall flag is set on in 
the LCB (LSTA = 64). 


For either a cleanup or a recall 
Operation, the routine releases all buffers 
assigned to the line. Buffers are released 
to the appropriate queue through an SVC 31. 
(The first buffer to be released may 
already contain a message segment; if so, 
it is posted to its destination queue.) 

The first buffer (if it does not already 
contain a message segment) and all 
subsequent buffers not scheduled to be 
filled are posted to the Available-Buffer 
queue. Pause BRB/CCWs encountered in the 
BRB ring from which buffers are being 
released are posted to the Additional CCW 
queue. 


Buffers that have been assigned to the 
line and have also been scheduled for a 
read from direct-access storage are treated 
differently. When such a buffer is 
encountered, the routine branches to the 
LPS Control routine. 


At that time, the cleanup flag or the 
recall flag (but not both) is on in the LCB 
for the line, indicating the type of 
operation in progress. When the LPS 
Control routine is entered, it waits fora 
message-filled buffer and proceeds as usual 
unless the buffer is assigned to a line for 
which the recall or cleanup flag is on. 
When a buffer with either flag, (but not 
both) is found, the LPS Control routine 
branches back into the Buffer 
Recall/Cleanup routine, where the buffer is 


~\ 


* 


a, 











then released to the Available-Buffer 
queue. 


To recall a message segment, the routine 
provides the buffer request blocks required 
to read message segments from the 
direct-access storage, obtains the segment 
being recalled, and exits to the calling 
routine. 


When the cleanup operations performed by 
this routine are finished, the routine 
exits to the Free-BRB routine. The 
Free-BRB routine completes the cleanup 
operation by releasing all BRBs in the ring 
to the Inactive-BRB queue and freeing the 
line for another operation. 


FREE-BRB ROUTINE (CHART 18) 


This routine is entered at LINEFREE from 
the Buffer Recall/Cleanup routine. Its 
function is to complete cleanup operations 
by releasing certain resources so they will 
be available for their next usage. 


The routine examines each BRB in the 
ring of BRBs passed to determine its 
disposition. If the BRB is not currently 
in the Active BRB queue, the BRB is 
released to the Inactive BRB queue through 
an Svc 31. If the BRB is in the Active BRB 
queue (this is an indication that a request 
for a buffer is still pending), the BRB is 
not released. Instead, it is bypassed and 
the next BRB in the ring is examined. Any 
BRB bypassed in this manner will be 
subsequently released by the Buffer-BRB 
routine. 


After all BRBs in the ring have been 
released (or bypassed), the routine posts 
the LCB to itself through an SVC 31. This 
is the standard technique for returning a 
line to the free condition. Exit is made 
to the LPS Control routine at IJLOIP20. 


DISK I/O ROUTINE (CHART DC) 


This routine is entered on activation of 
the Disk Input/Output subtask. The routine 
chains message-filled buffers (for disk 
writes) and BRBs (for disk reads) onto the 
element chain of the Disk Input/Output 
queue. The relative record number used by 
QTAM is converted into a relative track 
address. Then, the relative track address 
is converted into an actual DASD address. 
The routine then posts a special element to 
the LPS queue. After gaining control, the 
LPS Control routine issues the EXCP to 
write on or read from disk. 


When the checkpoint element is on the 
Disk I/O queue, the routine links all 
subsequent elements into the queue below 
the checkpoint element. When the 
checkpoint element reaches the top of the 
queue, the routine places the Disk I/O 
queue on the top of the Ready Queue and 
posts the checkpoint element to the 
checkpoint queue. 


DISK-END APPENDAGE (CHARTS DA AND DB) 


This routine is an I/O appendage, entered 
from the I/O Supervisor following a DASD 
read or write operation. If a receive 
operation over a line is taking place and 
the interrupt is from writing a buffer just 
received onto the disk, the routine routes 
the empty buffer required for the next 
segment to be received to the Available 
Buffer queue. If a send operation over a 
line is taking place and the interrupt is 
from reading a buffer to be sent from the 
disk, the routine routes the message-filled 
buffer to the LPS queue, initializes the 
next BRB in the ring to read the next 
segment of the message, and (if a buffer 
has been assigned) routes it to the Disk 
I/O queve. If the interrupt is from 
writing a checkpoint record on the disk, 
the routine gets the address of the 
checkpoint element and the checkpoint 
queue, and posts the element to the queue 
to activate the checkpoint subtask. 


IBM 7772 DISK-END APPENDAGE (CHART D1) 


This routine is an I/O appendage entered 
from the I/O Supervisor following a disk 
read operation on the 7772 DCV Vocabulary 
file. The routine stores the DCV word 
length in the ALCB associated with the 7772 
DCV buffer, and branches to the 7772 Line 
Write routine. 


IBM 7772 DISK READ ROUTINE (CHART D2) 


This routine analyzes the user-provided 
address chain located in the address-chain 
buffer of the ALCB to obtain the 
characteristics of the next DCV word to be 
sent. 


It is entered at IJLQAD30 from the 
ARU-Send routine when a DCV buffer has 
beenallocated to the ALCB of a 7772 line 
waiting for an audio answer. It is 
reentered at the same point from the Audio 
Line PCI routine each time the 
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transmissionof a DCV word begins and the 
next DCV word must be prepared. It is also 
reentered from the 7772 DCV Buffer routine 
when a DCV buffer is available for a 
waiting 7772 line. 


When a DCV word is to be read from the 
Vocabulary file, the address of the kLuffer 
part in which it will be read is stored in 
the ALCB. The routine is reentered at 
REREAD to check the presence of a pause or 
a repeat element in the address chain. 
Then, the DCV buffer representing a read 
disk request is posted to the LPS gueue via 
a branch to the Post subroutine. 


When a DCV word is already in main 
Storage in the word table, the length and 
address of this word are stored in the 
ALCB. The routine is reentered at REREAD 
to check the presence of a pause or a 
repeat element in the address chain. Then, 
a branch is made to the 7772 Line Write 
routine. 


If a pause element is encountered after 
a word address, the pause count is saved in 
the AICB and the routine is reentered at 
REREAD to check the possible presence of a 
repeat element. If a repeat element is 
encountered after a word address or a pause 
element, the repeat count is decremented 
and the address chain pointer is 
reinitialized at the beginning of the 
address chain. 


IBM 7772 LINE WRITE ROUTINE (CHART D3) 


This routine is entered at IJLQAD60 from 
the 7772 Disk-End Appendage and from the 
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7772 Disk Read routine when a write (or 
disable) operation must be requested or ee 
continued on a 7772 line. 


If the first DCV word is to be sent, the 
channel program in the 7772 ALCB is updated 
and this ALCB, representing a line write 
request, is posted to the LPS queue via a 
branch to the POST subroutine. 


When one of the intermediate DCV words 
is to be sent, the channel program is 
updated to allow the construction of the 
audio transmission, and a branch is made to 
the QDISPATCH subroutine. | 


If the last DCV word is to be sent, the 
channel program is updated, and the last 
write command is chained on either a 
disable command (if the line is operating 
in information or inquiry mode) or a read 
command (if the line is operating in 
conversation mode). Then, exit is made to 
the Qdispatch subroutine. 


IBM 7772 DCV-BUFFER ROUTINE (CHART D4) 


This routine is entered at IJLQAD40+6 on 
activation of the 7772 DCV buffer subtask 
when the Audio Line Appendage posts an 
available DCV buffer to the 7772 DCV buffer 
queue. This DCV buffer is allocated to the \ 
first ALCB dequeued from the ALCB waiting . 
chain located in the DCV buffer queue. The 


address of the Queue Insert subtask 


(IJLQIP8B) is placed in the subtask address 
field of the DCV buffer queue only when 
there is no more ALCB waiting for a DCV 
Buffer. In any case, the routine branches 
to the 7772 Disk Read routine. 











GENERAL FLOW 


Four routines are provided to execute the 
nonaudio line I/O functions: the Activate 
and Channel Program Generator routines in 
the QTAM Physical I/O module and the Line 
PCI and Line End routines in the Line 
Appendage module. 


Five routines packaged in the Audio Line 
Appendage module are provided to prepare 
the execution of the audio line I/0 
functions: the ARU-Internal and 
ARU-Receive routines operating in problem 
program mode, and the ARU-Send, the 7772 
Line PCI, and Audio Line End routines. 


The Activate routine is passed a 
message-filled or empty buffer and a BRB. 
It creates a CCW in the BRB and sets up 
pointers for the Channel Program Generator 
routine for a read or write initial 
operation or adds the buffer to an already 
initiated operation. 


The Line PCI routine releases a 
previously filled buffer to the LPS queue 
or an emptied buffer to the Available 
Buffer queue and places the associated BRB 
on the Active BRB queue for a new buffer, 
preparing it for its next use. 


The Line End routine provides many 
functions. On successful completion of an 
I/O operation, it routes the last emptied 
buffer to the LPS queue and restarts I/O 
for the LRC check, or it routes the last 
filled buffer to the LPS queue and goes to 
the LPS Control routine. For an error 
completion, the error condition is posted 
in the error-halfword of the LCB, and the 
LPS Control routine is entered. For a 
program check condition (an indication that 
the next BRB does not have a buffer 
assigned), a buffer is obtained through the 
PCI routine and the I/O is restarted. For 
a negative response to a poll operation, 
the polling List pointer is updated and the 
I/O restarted. 


The ARU-Internal routine posts to the 
ARU-Send queue an ALCB, which contains a 
user-provided address chain. 


The ARU-Receive routine posts to an 
MS-Process queue an ALCB, which contains an 
input message previously processed by the 
user*s ARU/LPS routines. 


The ARU-Send routine, according to the 
type of ALCB, performs the following 


LINE INPUT AND OUTPUT 


functions. For a 7770 ALCB, it prepares 
the channel program to send an audio 
answer, and posts the ALCB representing a 
Start I/O request to the LPS queue. Fora 
7772 ALCB, it requires a DCV buffer, if 
necessary, before control is passed to the - 
7772 Disk Read routine for exploitation of 
the user-provided address chain. 


The 7772 Line PCI routine, according to 
the type of the associated channel command, 
performs the following functions. When a 
PCI occurs on a Write command, the 7772 
ALCB is routed to the 7772 Disk Read 
routine. When a PCI occurs on a Read 
command, the routine releases, if 
necessary, the DCV buffer associated with 
the ALCB to the corresponding DCV buffer 
queue. 


The Audio Line End routine performs 
several functions. On completion of a 7772 
enable operation, it prepares an 
invitational or informational channel 
program and posts the ALCB to the ARU-~Send 
queue. On completion of an input 
operation, it posts the ALCB to the LPS 
queue to process the input message. On 
completion of an output operation, it 
updates the ALCB channel program according 
to initial conditions, posts the ALCB 
representing a Start I/O request to the LPS 
queue, and, if necessary, releases a 7772 
DcV buffer to the corresponding DCV buffer 
queue. 


OTAM PHYSICAL INPUT/OUTPUT MODULE 


Module Name: IJLORW (Chart RW, RX, RY) 
This module consists of two routines: 


1. the Activate routine, and 


2- The Channel Program Generator (CPG) 
routine 


These routines are discussed in the 
following paragraphs. 


ACTIVATE ROUTINE (CHART RW) 


Entry Point: This routine is entered at 
IJLQORW by the LPS Control routine, the EOB 
Or EOBLC routine, and the expansions of the 
ENDSEND and POSTSEND macro instructions. 
Upon entry, it is expected that the 
register contents are: 
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(IJLQLCBR) contains the LCB 
address. 


Register 4 


Register 6 (IJLQBFRR) contains a buffer 
, address. 

(IJLQLPSR) contains a user 
LPS routine address. 


Register 7 


(IJLQTBLR) contains the 
terminal table entry address. 


Register 8 


(IJLQEOSR) contains the end 
of segment address. 


Register 9 


These registers plus registers 0, 13, and 
15 are preserved by this routine; the 


others are destroyed. 


Function: The Activate routine creates a 
channel program in a BRB and/or performs 
initialization functions for the CPG 
routine. It then exits by a branch to the 
CPG routine to initiate the I/O operation, 
or by a branch to the LPS Control routine, 
at IJLOIP20 in module IJLOIP, when a buffer 
has been added to a previously started line 
I/O operation. 


In operation, the BRB to which the 
buffer is to be assigned is located from 
the LCCW field in the LCB. The chain field 
of the BRB to which LCCW points addresses 
the current BRB. Fora "first" BRB, LCCW 
points to LPCI-9 (a pseudo BRB), and LPCI 
(the chain field of this pseudo BRB) is 
initialized to the address of the first 
real BRB. The buffer text address is 
placed in the BRB/CCW data field and a read 
or write operation code is inserted in the 
command code field. The handling 
thereafter depends upon the function of the 
BRB. 


First BRB 


The BRB may be a "first" BRB for receiving 
or sending. For this BRB, the channel 
program must be started through the Channel 
Program Generator routine. This includes 
an initial read or write operation and a 
read or write continue operation after an 
EOB. 


The BRB is set up to perform the I/O 
operation but is not used for it. The 
channel program is generated by the Channel 
Program Generator routine. For an initial 
operation, the data address passed to the 
CPG routine is the message header portion 
of the buffer. The count is the end of the 
segment minus the beginning address. 


For a write initial, register 1 is set 
to point to the addressing characters 


118 DOS QTAM Program Logic Manual 


(nonswitched terminal) or dial digits 
(switched terminal), or CCB/ECB (IBM 2260 
Local) which are in the terminal table 
entry. If it is a nonswitched line, the 
device access area format is: 


where A = addressing character and P = 
polling character. For a switched 1050 the 
format is: 


ek ere: alana 1 
|N] Dial Digits| AA | 
EEE Panerertecenterey Sarak aren! Veneer: 
where N = the number of dial digits. Fora 
TWX terminal, the format is: 
(Se ee oe 2 a ac ce 1 
| N |Dial Digits] M |SPACE] ID COMPARE | 
Race san) Gee erence eee pares Cees es Bes She ee J 


where M = the length of the TWX terminal 
identification sequence. The dial digits 
are sent to address the TWX terminal, and 
the responding ID sequence is read into the 
SPACE area and compared against the ID 
COMPARE sequence (the compare is performed 
in the Line End routine). For an IBM 2260 
or 1053 Local terminal, the device access 
area consists of a 16-byte CCB followed by 
an eight-byte ECB. 


For a read initial on a nonswitched 
remote polled line, register 1 is set to 
point to the current polling list entry. 
The polling list entry is a two-byte offset 
to the terminal entry in the terminal table 
which can be accessed to obtain the polling 
characters. The last two bytes in the poll 
list contain binary zeros. For a switched 
1050 line, the polling characters are in 
the polling list. The format is: 


es: samereraay | 


The zero byte specifies an answer list. 
For a TWX line the format of the polling 
list is: 


fe 
| O | N | ID DIGITS | 
i i A a a ah a el pa th a cael 


For an IBM 2260 Local, register 1 is set 
to point to the CCB in the terminal table 
entry. 


For a read initial on an autopolled 
line, the polling characters are in the 
polling list which has the following 
format: 











where PP are the polling characters (one 
for an IBM 1030, two for other terminals), 
and I is the index byte used to identify 
the terminal in the polling list. 


For a read initial, idle characters are 
placed in the field reserved at the 
beginning of the message area in the 
buffer, as specified in the LPSTART macro. 
The incoming message is temporarily routed 
to the error queue. The channel program is 
then generated. For a switched line for 
which connection has previously been 
established (the “Don't Dial" flag is on in 
the LCB), a write conversational channel 
program is specified. 


For a write initial or write 
conversational, the status of the terminal 
is checked before entering the CPG routine, 
If the terminal is not receiving, the error 
is posted and the user’s LPS routine is 
entered via register IJLQOLPSR. 


A read or write continue is requested by 
the EOB or EOBLC routine. In this case, 
the address and count for the data transfer 
is modified by the EOB offset field in the 
LCB to point to the position after the EOB 
character. 


Non-First BRB 


A “non-first" BRB is associated with an I/0 
operation which was started previous to the 
assignment of this buffer to this BRB. The 
address of the buffer text area and the 

_ count are placed in the BRB/CCW. The PCI 
and CD flags are set to one in the CCW. If 
it is the last segment of a message, the CD 
flag is turned off. The operation with 
which this BRB is associated: 


1. may be currently in progress, 


2. may be on an IBM 2260 Local read 
Operation and thus not yet have been 
Started, or 


3. may have been terminated with a 
channel program check (invalid TIC 
address), indicating that a buffer was 
not supplied in time. 


In cases 1 and 2, the TIC in the 
previous BRB is made valid. If the 
previous BRB was a "first" BRB, the channel 
program is chained to this BRB. (If it was 
not a “first™ BRB, the two BRBs are already 
chained.) The BRB status is tested for an 
indication of the last BRB in the ring for 


an IBM 2260 Local read operation. If this 
is not the case, a branch is made to the 
LPS control routine. If this is the case, 
a branch is made to start the channel 
program before returning to the LPS Control 
routine. 


In the case of a channel program check, 
the BRB address is moved into the CCB 
channel program address area, EXCP is 
issued to restart the I/O, and a branch is 
made to the LPS control routine. 


Pause BRB 


The Pause BRBS are special BRBs that send 
fill characters as specified by the user in 
a PAUSE macro. The first Pause BRB sends 
text, if there is text, as well as fill 
characters. The PAUSE routine creates CCWS 
with address and count fields. The count 
field for the first BRB/CCW in the chain is 
computed from the beginning of text address 
and the address in the next BRB/CCW (filled 
in by the PAUSE routine). All succeeding 
Pause BRBsS are skipped over. 


CHANNEL PROGRAM GENERATOR ROUTINE (CHARTS 


RX, RY) 


Entry Point: This routine is entered at 
RW1CPGO1 from the Activate routine. The 
address and count for the read or write 
data CCWs are passed from the Activate 
routine. The polling or addressing list 
address (or dial digits address) is passed 
in register 1 from the Activate routine. 
The count for the polling or addressing CCW 
is contained in the model CCW. The dial or 
TWX count is in the polling list passed. 


Function: This routine creates a channel 
program in the CCB and issues EXCP to start 
the I/O. The channel programs created are 
Read/Write Initial, Read/Write Continue, 
Write Conversational, and Read Repeat. For 
initial contact on a Switched line, the 
Answer or Call segment of the channel 
program is also generated. Exit from this 
routine is made by a branch to the LPS 
control routine (IJLQIP20 in module 
IJLQIP). This occurs when the end of the 
polling list is encountered or after the 
start of the I/O operation. It permits the 
initiation of I/O on other lines and 
concurrent processing of messages in the 
LPS sections or message processing 
programs, if any. 


In operation, the desired channel 


program is created from model channel 
programs contained in a device I/O module. 
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The special characters for the device are 
also contained in the device I/C module. 
The address of the Device I/O module fora 
line is in the DTF table. 


A model channel program consists of the 
skeleton information for every CCW needed 
to perform a given operation. The 
information includes the operation code, 
flag byte, TP operation code, and a count 
byte which may or may not be used. 


Eleven subroutines in the CPG routine 
create CCWS: 


1. Model Expander 1 (RW1SG101): inserts 
the address and count fields into the 
read response to polling, disable and 
enable CCWs. 


inserts 
into read 


2. Model Expander 2 (RW1SG201): 
the address and count fields 
or write data CCwWs. 


inserts 
into read 


3. Model Expander 3 (RW1SG301): 
the address and count fields 
response to addressing CCWs. 


4. Model Expander 4 (RW1SG401): inserts 
the address and count fields into 
special character CCWs. 

5. Model Expander 5 (RW1SG501): inserts 


the addressing and count fields into 
write polling/addressing characters 


CCWs, dial CCWs or Read or Write TWX 
ID CCWs. 

6. Model Expander 6 (RW1SG601): inserts 
the address and count fields into the 
poll cCCWs. 

7. Model Expander 7 (RW1SG701): inserts 
the address field into the 
transfer-in-channel CCWs for automatic 
polling (Auto Poll). 

8. Model Expander 8 (RW1SG801): inserts 


the address of the sense field 
(TJLOLSEN) of the LCB into the Sense 
CCW of the Read Initial channel 
program. 


9. Model Expander 9 (RW1SG901): inserts 
the addressing and count fields into 
the Write CPU-ID and Read Terminal-ID 
CcWs. Moreover, in the case of the 
Write CPU-ID CCW, this expander checks 
whether WRU=YES is specified in the 
DTFQOQT macro instruction. 


a. If WRU=YES is specified, the 
Command Chaining flag is set on, 
the next CCW (Write WRU) is 
executed, and an identification 
sequence exchange is performed. 
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b. If WRU=YES is not specified, the 

Command Chaining flag remains off. 

In this case, the computer 

identification is sent to the 

terminal, but no identification 

sequence exchange is performed. 
10. Model Expander 10 (RW1SGA01): is 
associated with the TIC command of the 
Write Initial channel program to 
insert the transfer address into this 
TIC command. This transfer address 
is: 


ae the address of CCW no. 3 (Write 
CPU-ID) if the WRU macro 
instruction is present in the Send 
Header subgroup of the LPS; or 


b. the address of CCW no. 6 (Write 
Area) if the WRU macro instruction 
is not present in the Send Header 
subgroup of the LPS. 
11. Model expander 11 (RW1SGB01): inserts 
the address of the letter shift 
preceding the mark character string 
into the address field of the CCW. 
For a line defined as an output-only 
line, this subroutine adds to the CCW 
count the number of mark characters to 
be sent. 


If an initial operation is requested on 
a Switched line, a call or answer segment 
channel program is generated. The read or 
write initial segment is generated 
following the call or answer segment. 


If a read initial operation is requested 
on a nonswitched line, the polling list is 
scanned until an entry is found for a 
terminal that is in a receiving status. If 
the end of the polling list is encountered, 
the buffer (empty) is posted to the LPS 
queue, and an exit is made to the LPS 
Control routine. 


After the operation segment of the 
channel program has been generated, a TIC 
to the second BRB in the ring is placed 
after the last CCW in the CCB. If a buffer 
has not been requested for the second BRB, 
the PCI flag is set in the last CCW in the 
CCB. EXCP is issued to start the I/O and 
exit is made to the LPS Control routine. 


Channel program generation for an IBM 
2260 Local network differs from remote 
operation in two respects. First, because 
this is a contention device, polling is 
unnecessary. Instead, the terminal 
requesting attention is identified via the 
CCB for the line, which is included in the 
terminal table entry. Second, in order to 
efficiently handle the higher data rate of 
a local device, the channel program for 
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receive is not started until all buffers 
are assigned. 


For a write initial, the CCB for the 
line is accessed in the terminal table 
entry. An SVC 25 is issued to remove the 
CCB from the DOS channel queue. The 
appropriate channel program (as specified 
by the WRT60 operand of the MODE macro) is 
generated and started in the same manner as 
for remote devices. No addressing is 
required because the device is connected 
directly to the channel. The supervisor 
automatically restarts any write that 
encounters a busy device. 


For a read initial, the CCB in the 
terminal table is accessed for generation 
of the channel program. The appropriate 
read CCW (as specified by the RTYPE operand 
in the DTFQT macro instruction) is 
generated. The PCI flag is turned off. 

The channel program is not started at this 
time. Instead, control returns to the LPS 
Control routine to continue assigning 
buffers for the read. 


CHANNEL PROGRAMS 


The device I/O modules contain the model 
channel programs which the CPG routine uses 
to build the executable channel programs. 
There is one device [I/O module for each 
terminal type supported. See Figure 6. 


QTAM frequently places a TP operation 
code into bits 40-47 of a CCW. These codes 
are used to determine the action to be 
taken when an interrupt occurs. The TP 
operation codes used are contained in 
Figure 7. 


SS a aaa a a ar a 1 
ieauite ae Model Channel Programs For: | 
}----------- {----------------------------- { 
Laan a 1030 

areal for 1060 

ee ta 2260 Remote (2848) 

foe foe 83B3 

| TIJLOM4 or Plan 115A 

aeeree a 1050 Switched/Nonswitched 
epee oe 1050 Nonswitched 

ere mes TWX (Models 33/735) 
‘aati ae 2260 Local 

I aan aoe 2740 (Basic) 

cou an 2740 (Basic/Dial) 

ae fee 2740 (Station Control) 
oe for 2740 (Station Control 

l jand Checking) 

aon fr 2740 (Dial, Transmit 

| {Control and Checking) 

fone foe 2740 (Checking) 

pane or 2740 (Dial and Checking) 
ie JIBM 2740 (Dial and Transmit 

| |Control) 

rou {World Trade telegraph 

| jterminal 

ee eee eee aes A cca eee de Cac is as re eee ee J 
Figure 6. Device I/O Modules 
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Meaning | 


= 
| 
| 

ana i ee gee { 
| 
| 


X"O1" |Read Response to Write polling 
|characters (POLL-RESTART). 


X"02"|Read Response to Write addressing 
[characters (MULTI-ADDR). 


ee or write data 

pegs eens after Enable. 

er or WITA identification check 
Sauce eens with skip. 

sepannews response to Write text (IBM). 
eee text in buffer. 

Sagas cacenn 


X"O0A* |Write Break (contention on 
|WITA lines) 


bee et es CR ce co A SR OE I Re SE RE ees SE ce ee SN eo SINE tN 


| 
| 
| 
| 
| 
| 
kK 
| 
| 
| 
| 
| 
| 
i 
| 
| 
| 
! 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
! 
| 
| 
1 
| 
| 
{ 


Figure 7. TP Operation Codes 


Each device I/O module contains a table 
of offsets at the beginning that defines 
the valid operations for the device. Each 
byte in the table contains the offset to 
the model channel program for the specified 
operation. The offsets and the 
corresponding model channel programs are 
defined in Figure 8. If the operation is 
invalid for the device, the byte contains 
X*FF*. 
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: Offset Code | Operation 
| X"00' | Autopoll Read Initial | 
| x*01' : Read Initial | 
| X*02' | Write Initial | 
| x" 03" | Read Continue | 
| X* O48 ! Write Continue | 
| X"05* | Read Short | 
| X" 06" : Write Conversational : 
| xX*O7* | Read Repeat | 
Xx" 08* | Answer Segment | 
| X*09* | Call Segment | 
X™ OA" | Special Characters | 
X* 0OB* | Write Erase | 
| X"0C* | Write At Line Address 


Table of Offsets to Model 
Channel Programs 


Figure 8. 


In the following channel operation 
descriptions, 


Table refers to the special character table 
in the device I/0 module | 


List refers to the polling, addressing, 
dial, or TWX ID list passed by the 
Activate routine, 

Area and Length are the address and count 


fields passed by the Activate 
routine. 


~ 


IBM 1030--Terminal to CPU 





Read Initial: 


(HSS yaa a a Goo aa car oo eo Toe oe 1 
| | | | | | TP | | 
{Command | Operation | Address |] Flags | Code ] Count ] 
Co to r ee ae os 

| 
| 1 | Write © © © | Table | CD,SLI |] 0 l 3 
| | | | | | 
| 2 {| Write polling characters | List } cc,SLI | 0 1 ] 
| | | | | | | 
| | | | | | 
| | | | | | 
| 3 |} Read response character | Area ] cD | Polling ] 2 l 
| | | | | Restart | | 
| | | | | | 
| 4 | Read message block } Area+2 | CD | 0 } length-2 | 
Bees ek Ba he a Us SE gs oa ie eet a 6 ade eran f eeneneee een eemec errs J 


Command 1: Sends three Cs to set all terminals on the line in 
control mode. 


Command 2: Polls a device by sending its polling characters. 
Command 3: The effect of the command is as follows: 


1. A negative response (only one character received) causes 
an interruption with a wrong-length indication. The 
Line End routine detects this condition and initializes 
the channel program to poll the device specified by the 
next entry in the polling list. Control is then 
returned to the Supervisor for execution of commands 2 
through 4. This procedure continues until (a) a 
positive response is received, or (b) the last 
nonskipped entry in the polling list has been polled... 





2. On positive response, the response character and the 
first byte of text are read. Data chaining then takes 
effect to Command 4. 


Command 4: Reads text until the count is exhausted and chains through a 
TIC placed after it to the second BRB/CCW in the ring. Ifa 
buffer was not requested for the second BRB/CCW, the PCI 
flag would cause an interrupt on Command 4 and the PCI 
routine would be entered to obtain a buffer. If the buffer 
had been requested but not assigned, the TIC command would 
have an invalid address that would cause a program check 
interrupt. The Line End routine would recognize this 
condition and obtain the buffer. 


The preceding example is the channel program generated for a 
read-initial operation to poll the IBM 1030. The channel program for 
polling the other terminals supported may be slightly different, but the 
polling technique is the same. Note that the IBM 1030 uses only one 
polling character in Command 2; therefore, the count is 1. 


When an IBM 1031 Input Station is polled, each input unit of the 
station takes part in sending the message. The 1031 determines the 
order in which these input units will be contacted. The input units of 
the 1031 are the card reader, the badge reader, the manual control unit, 
and the cartridge reader. 
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| Command 


ee cone ween eee ee 


LO NE OS A EL SE RE SN ce SNE NS QE SRD SEES SD SL eeme eee sumems sommes SER 
= 


-~ 


Command 


NO 


Command 


Command 3 


Command 4 


Command 5 


Command 6 


Command 7: 
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Sa ee oe ee aa 
Operation | 

aE ana at OS ene a Pe RE ET ORE 4 
| 

write © © © | 

| 

Poll | 

| 

| 

| 

| 

TIc | 

| 

| 

TIC | 

| 

| 

Poll | 

| 

| 

| 

| 

PLC | 

| 

| 

Read Response | 

| 

Read Message Block | 

Sash eal eel ae ies a a enh 1 


Table 


Any 
entry in 
polling 
list 


2nd POLL 
Command 


Read 
Response 


ist 
entry in 
polling 
list 


2nd POLL 
Command 


Area 


Areatl 


-}————— — — — — 


SLI 


CC, SLI 


SLI 


Q 
oO 


fp YH 


TP Code 


| 


fr yp 


Sends three ©) ‘s to set all terminals on the line in 


control mode. 


k(n) 


Starts polling of the terminals on the line, beginning at 


any entry in the polling 


I3St« 


k = 2 for IBM 1030, k = 3 for other devices. 


n 


and the end of the polling list. 


number of terminal entries between the starting entry 


On a negative response to polling at the end of the polling 
list, this TIC command will be executed to start the second 


POLL command. 


x 


On a positive response to polling, this TIC command will be 
executed to start the READ response command. 


Starts polling of the terminals on the line, beginning at 


the top of the polling li 


k 


n 


st. 


2 for IBM 1030, k = 3 for other devices. 


total number of entries in the polling list. 


On a negative response to polling at the end of the polling 


list, this TIC command will be executed to restart previous 


(2nd) POLL command. 


effect to command 8. 
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Reads the index byte and the first byte of text in the first 


two bytes of the buffer area. Data chaining then takes 


\ 








Command 8: Reads text until the count is exhausted and chains through a 


TIC placed after it to the second BRB/CCW in the ring. If a 
buffer was not requested for the second BRB/CCW, the PCI 
flag causes an interrupt on command 8 and the PCI routine is 
entered to obtain a buffer. If the buffer was requested but 
not assigned, the TIC command has an invalid address which 
causes a program check interrupt. The Line End routine 
recognizes this condition and obtains the buffer. 


The preceding example is the channel program generated for an Auto Poll 
read initial operation to poll an IBM 1030. The channel program for 
polling the other terminals supported is the same. 


Read Continue: Consists of a Write (YY) plus a read initial operation. 


A read continue operation is sent after an EOB character has been 
encountered during a read operation. It restarts polling on the line. 


Read Repeat: Consists of a Write (N) plus a read initial operation. 
Read Repeat is issued after an EOB character has been encountered during 
a read operation, EOBLC is specified, and an error in transmission 
occurred. It sends a negative response (N) and chains to a read 
initial sequence which restarts polling. 
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IBM 1030--CPU to Terminal 
Each 1033 printer on a line is addressed with a single addressing 
character obtained from a terminal table entry. 


Write Initial: A write-initial operation addresses and then sends a 
message to the 1033 printer. 


Paes et re a RO ge cg a ON eg a ge ge Cae Ge OP eee On | a ge andr eee gee Pa ey en Oe ee ee T 
| Operation | Address | Flags | TP Code |] Count | 
| ------------------------------- +--------- erect +--------- oman 
| | | 

[1. Write © © © © | Table | CD,SLI | 0 | 4 
| | | | | | | 
|2. Write addressing character | List } cD | 0 | 1 1. 
| | | | | | 
{3. Write 1 {| Table | ccC,SLI | 0 j 2 | 
| | | | | | 
|4. Read response to addressing | Area } cc | 0 | 1 | 
| | | | | | 
{[5. Write Data | Area | CD | Read | | 
| | | | data | Length | 
RS A aes ia ee eee eh a Yeon eens nee aes pean ee cena 5 ae een cee oi ecg es J 
C Places the line in control mode. 

S Indicates to the 1031A control stations that the address specifies 

a 1033 printer. 

1 Conditions the 1031A to answer. | 

The 1031A replies with either @) (ready) or (not ready). 
Command chaining occurs only on the receipt of - On negative 


response to addressing, the operation is terminated. On positive 
response, Command 4 chains to Command 5 to begin the data transfer. 


Write Continue: Same as step 5 of the write-initial operation. A Write 
Continue is requested after an EOB character when sending. 


IBM 1060--Terminal to CPU 


Each IBM 1062 Teller Terminal is polled with a two-character code. The 
first of these two characters identifies the IBM 1061 Teller Terminal 
(one or two per 1061). 
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Read Initial: Used to begin polling on the line. The channel program 
is: 


ee EN AS ERY SET OED OND RE SS Ae AAR TENG SERNA Mane SERRA SERED SERS stem | 


PSPs, pot cg ee, NS He nee 


T T T 
| Operation | Address | Flags | TP Code | Count | 
Eek. aaa de po : r rT 
| | 
jl. write © © ©] Table | cD,SLI | 0 {| 3 
| | | | | | 
{2. Write polling | List | C6,SL1. | 0 | 2 | 
| characters | | | | | 
| | | | | 
{3. Read response | Area | CD | Poll- | 2 | 
| character | | | restart | ] 
| | | | | 
|4. Read message | Areat+2 | CD | 0 | Length-2 |] 
| block | | | | | 
Eien ieee ah icc tenes ere Seana peepee pce a erence eer ene Eee cae na a ee ee 4 


Auto Poll Read Initial: Used to begin polling on the Auto Poll line. 
The channel program is: 


i ( aa c.. | i ae Hl 

| | 

{Command | Operation | Address {| Flags | TP Code {| Count 
aa ‘aor oo ae .. H 

| 

( 1 | write © © © | Table | cc,SLI | 0 | 3 
| | | | | | 

| 2 | Poll | Any entry | CC,SLI | 0 | k(n) 
| | | in polling| | | 

| | | Last | | 

| | | | | 

| 3 | TIC {| 2nd POLL | SLI | 0 | 1 

| | | Command | | | 

| | | | | 

| 4 | TIC | Read | | | 

| | | Response | | | 

| | | | | | 

| 5 {| Poll {| ist entry | CC,SLI ! 0 | k(n) 
| | | in polling| | | 

| | |} list | i | 

| | | | | | 

| 6 | TIC {| 2nd POLL | SLI J 0 | 1 
| | | Command | | | 

| | | | 

i 7 | Read Response | Area | CD | 1 | 2 
| | fs | | | 

| g | Read Message Block | Areat1 [ CD | 3 | 
ee ae en ee 5 ee ane eee EN ete ee, ote ee ara he Re Os oe Fea eae af 


Read Continue [=write (+ Read Initial]: Read continue is issued 
after an EOB is encountered during a successful read-initial operation 
to execute a Single command to send a positive response to the 1061 


and chain to a read-initial sequence to restart polling on the line. 





Read Repeat [=Write.(N) + Read Initial]: Read Repeat is issued after a 
Read operation is terminated by an incoming EOB and the block was 
received in error. The channel program writes the negative 

response (N) to the 1061, then chains to a read-initial sequence to 
restart polling on the line. Read Repeat is performed only when the 
EOBLC macro iS specified. 
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IBM 1060--CPU to Terminal 


Each 1062 on a line is addressed with a two-character code. The first 
of the two addressing characters identifies the 1061 control unit. The 
second character identifies the 1062 terminal. 


Write Initial: A write-initial channel program is issued to address and 
send a message to a 1062. The channel program is: 


area i a ee ee ee Te et 1 
| Operation | Address | Flags | TP Code | Count i 
[ rT r a a 
[1. write © © @©I Table | @,sLI | 0 | 3 l 
| | | | | | 
|2. Write address- | List | cc,SLI | 0 | 2 | 
| ing character | | | | | 
| | | | | | 
|3. Read response | Area | CC | 0 | 1 { 
| to addressing | | | | | 
| | | | | 
{4. Write message | Area | CD | 0 | Length | 
| block | | | | 
eS eee et teen eee eee BD eee oe) Soca NP oases ae Messe e be ts J 
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IBM 2260 Remote (2848) 


PROGRAMMING INFORMATION 


1. The format of a message received from a 2260 through a READ is the 
following: 


a a re ee ae et ae ee a ee Te See 


| STX| device address | [text] | [CAN] |ETX|LRC| 
bse te pene ee  SSaanenconeen i cpa Eee ae 


STX: Start of text character. 


Device Address: Characters that identify the sending unit (display 
station or printer). 


Text: The printer status has a zero-length text. 


CAN: This character is sent only if the display control unit 
detects an internal operation error when transmitting the 


message. 
ETX: End of text character. 


LRC: Longitudinal redundancy check character. The LRC 
accumulation is started by the STX character and terminated 


by the ETX character. 


2. The format of a message sent to a 2260 through a WRITE is the 


following: 
ee ee ee 1 
| STX | text | ETX | LRC | 
ieee ee eee Ngee eee S aenpeeae ee J 


3. When Write-at-Line-Address is specified, the first byte of the text 
indicates the line address. 


When further messages are sent without re-addressing, the display 
Station interprets the first character after STX as a line address. 


IBM 2260 Remote--Terminal to CPU 
Each IBM 2260 is polled with a two-character code. 


Read Initial (DISPLAY): A Read-initial operation is issued to start or 
restart polling on a line. The channel program is: 
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es ee re ee {oe ys cena Pore ee ae, 1 
| Operation | Address | Flags | TP Code| Count | 
}------------------ {--------- $-------- +~-------- {----------- { 
| . | | | | | 
{1. Write EOT | | | | j 
| sequence | Table | CD | 0 | 3 | 
| | | | | 
|2. Write polling | List | CD | 0 | 2 | 
| characters or | | { | { 
| printer | | | | | 
| request chars. | | | | | 
| | | | | | 
{3. Write READ MI | Table | cCCc,SLI | 0 | 1 | 
| code | | | | 
| (2848 alert) | | | | j 
| | | | | | 
[4. Read response | Area | CD j Poll- | 2 | 
| character | | | restart| | 
| | | | | | 
{5. Read message | Areat+2 | CD | 0 | Length-2 | 
eee ak ee ey el re any  Sapieee ne Pen e pence ere Bit Se ee iol eae i J 


The characters specified in the polling list may initiate a specific 
poll of a 2260 display station or a general poll of a 2848 display 
control unit. 


Specific Poll of a Display Station: On positive response (STX), Command 


4 chains to Command 5, and the ressage is read. On negative response 
(EOT), an interruption occurs. The Line End appendage routine detects 
this condition via the TP op code, initializes the channel program to 
poll the next entry within the list, and returns control to the 
Supervisor. 


General Poll of a Display Control Unit: If the printer has a status 


pending as a result of a previous request (see Write Initial), this 
message will be transmitted. Command 4 chains to Command 5. If the 
printer is not ready, the display stations are scanned for a message. 

If a message is pending, it is sent. If the printer is not ready and no 
message is waiting for transmission, a negative response EOT is 
received. The channel program is interrupted. Line End detects this 
condition, updates the channel program, and returns control via the 
Supervisor to poll the next entry within the polling list. 


Read Continue [WRITE ACK + Read Message]: READ Continue is requested 
from the EOB routine after a successful read-initial operation. A WRITE 


command sends a positive response (ACK) to the station and chains to a 
READ. If the previous operation was a specific poll of a display 
Station, that station answers with EOT, which ends the operation. If 
the previous operation was a general poll of a display control, a 
message is received if one is pending; otherwise, an EOT ends the 
operation. 


Read Repeat [WRITE NAK + READ Message] (Display Only): A Read Repeat is 


requested from the FOBLC routine for retransmission of a message block 
that is received in error. The Write command sends a negative response 
to the display station and chains to a read command to retry the 
transmission. 


130 DOS QTAM Program Logic Manual 


ja 











IBM 2260--CPU to Terminal 


Two characters are used to address the IBM 2260. 


Write Initial (Display or Printer): 


aaa a ai | a ee ara a a a dea een RNR Se 1 
| Operation | Address | Flags |} TP Code| Count | 
}------------------ $--------- +-------- }--------- }----------- { 
| | | | | 
j1. Write EOT ] | | | | 
| sequence | Table | CD | 0 | 3 | 
| | | | | | 
}2. Write address- | List | CD ] 0 | 2 | 
| ing characters | | | | | 
| | | | | 
| 3. Write WRITE | | | | | 
| code | Table | cCc,SLI | 0 | 1 | 
| | | | | | 
{4. Read response | Area | CC | 0 | 1 | 
| | | l | | 
{5. Write STX | Table | CD | 0 | 1 | 
| | | | 
|6. Write message | Area | CD ] 0 {| Length | 
L 5 pee ee eee rere fl ee ener cre iaasa dete Die ta J 


The ECT sequence resets the IBM 2848 Display Control address selection 
to control mode, nonselected status and causes all 2848s on the line to 
prepare to receive an addressing sequence. The addressing characters 
indicate a display station or a printer. 


When a printer is addressed, Command 4 reads the response to the 
addressing sequence. A negative response (EOT or NAK) interrupts the 
channel program: NAK indicates that the printer is not ready ; EOT 
indicates that the printer is ready but the buffer is not empty. [In 
both cases a printer request is set. 


A positive response (ACK) indicates that the printer is ready and 
available. Command 4 chains to Command 5, and the message is sent. If 
a transmission error occurs, the 1053 operation is aborted as soon as 
the data parity error is detected, a quote symbol is printed out, and 
the printer buffer is cleared. EOBLC causes transmission retry by 
requesting a Write continue. 


When a Display Station is addressed, Command 4 reads the response to 


the addressing sequence. That response is normally positive (ACK). 


Command 4 chains always to Command 5. The characters are displayed on 
the CRI, starting at the cursor position. , 


If a transmission error occurs, the transfer is retried from EOBLC by 
requesting a Write Continue. However, the data will be displayed 
starting at the cursor position, and the erroneous message will not be 
cleared unless the write erase option is specified in the user's LPS 
(MODE macro). 


Write at Line Address (Display Only): Same as Write Initial, except 
Command 3 is the write WRITE LINE code. The MODE macro causes a Write 


at Line Address operation, which positions the cursor to the start of a 
Specified line. If a transmission error occurs, sending is retried with 
a Write Continue. Data will be displayed starting at the same line. 
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Write Erase (Display Only): Same as Write Initial, except Command 3 is a 
write ERASE code. Write Erase is specified by the MODE macro to erase 
the CRT before the next segment is sent. 


Write Continue [=Write Message] (Display or Printer): A Write Continue 
is issued when an error is encountered while sending and the EOBLC (or 


EOB) macro has been specified. If the previous operation was a Write 
Initial addressing a printer, the Write Continue retries transmission of 
the message. 


If the previous operation was a Write-at-Line-Address, or a 
Write-at-Line-Address followed by one or several Write Continues, the 
cursor is positioned at the beginning of the line specified in the 
message. In all other cases, the characters are displayed on the 
station starting at the cursor position. 


IBM 2260 LOCAL (2848) 


Programming Information 


1. A message received from an IBM 2260 through a read consists 
entirely of text. The transmission code is in EBCDIC. The 
transmitted text consists of all characters displayed between the 
START and EOM symbols and excluding any characters to the right of 
the first NL symbol on a line. (The NL symbol itself is 
transmitted.) There are no line control characters for this - 
device. 


A zero~length text is possible and can arise in the following 
ways: 


a. The terminal operator enters a null message (START and EOM 
only). 


b. The operator attempts to enter a message with no START symbol. 


c. The operator prepares a valid message, but the START symbol is 
erased between the time the ENTER key is depressed and QTAM 
issues the read. 


When a zero-length message is received, the ‘zero-length 
message"bit (bit 4) is set in the error halfword. 


2. A message sent to an IBM 2260 Local through a write consists 
entirely of text, except when the write-with-line-address mode is 
specified in the MODE macro instruction. A zero-length message is 
allowed and may be used with the erase/write MODE option to effect 
erasure of the display. 


3. When write-at-line-address mode is being used, the first byte of 
the user header portion of the message must be the line address 
code. This byte is transmitted but is not displayed. Line address 
codes for the IBM 2260 Local terminal are shown in Figure 8A. 

Other values for the line address byte give unpredictable results. 


4. Messages to an IBM 2260 Local which exceed the line width 
automatically continue on the next line, wrapping around from the 
last line to the first if necessary. Messages to the IBM 1053 a 
printer should contain NL or EOM characters for carrier control. 
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The WRT60 operand of the MODE macro instruction is ignored for 
messages to the IBM 1053 printer. A write initial command is 
issued and the line address code, if present, is printed as data. 
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IBM 2260 LOCAL~~TERMINAL TO CPU 


Terminal to CPU transmission occurs as follows: 


1. 


4. 


At OPEN time, or following the completion of a successful read or 
write, the CCB for the line is placed on the Supervisor channel 
queue by the IBM 2260 Local Appendage. This initializes the 
Supervisor to pass Attention interrupts from the terminal to the 
IBM 2260 Local Appendage. 


When the terminal operator has a message to send, he keys a START 
symbol, followed by the message text, and then presses the ENTER 
key. This causes an Attention interrupt, and the Supervisor passes 
control to the IBM 2260 Local Appendage. This appendage removes 
the CCB from the channel queue and posts it to the Attention queue 
Maintained in the LCB for the line group. 


When QTAM recognizes the CCB on the Attention queue, a number of 
buffers sufficient to contain the maximum size message (as 
specified in the BUFNO operand of the DTFQT macro instruction) are 
obtained, and a channel program is built to read the entire 
message. 


When all buffers have been assigned, an EXCP is issued,to read the 
message. 


Read Initial: A read initial is issued to read a message from the IBM 
2260 Local. All characters between the START and EOM symbols, except 
characters to the right of a NL symbol, are transfered. When the 
message is read, the START symbol is cleared and the keyboard is 
unlocked. If insufficient buffers have been specified in the BUFNO 
operand, a partial message is received and the ‘insufficient buffers' 
bit (bit 11) is set in the error halfword. The channel program is: 


r--— 


Ea: SreaNera teas: ts oon ae 1 
| Operation | Address | Flags | TP Code | Count | 
~---------- 4---------}----+--}---------}------ 
| Read DS MI]| Area | CD,SLI| 63 | Length| 

eee een ae ee Ean en pera ween Ieee en Te ManCiua! Deen ree mee ier oy Senin eieeniieisars 
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Read Short: A read short replaces a read initial for all terminals in 2S, 
the line group if RTYPE=SHORT is specified in the DTFQT macro 

instruction. The read short option allows the user to take advantage of 

the faster hardware end-sequence for this command. Read short does not 

clear the START symbol after the message has been read, but it does 

unlock the keyboard. The channel program is identical to read initial 

except that the command code is Short Read DS MI. 





IBM 2260 Local--CPU to Terminal 


CPU-to-terminal transmission occurs as follows: 


1. QTAM issues an SVC 25 to remove the terminal CCB from the channel 
queue. This causes the Supervisor to ignore any subsequent 
Attention interrupts from that device. 


2. A write channel program is executed to write to tne IBM 2260 Local 
or to the IBM 1053 printer. 


3. If the device is an IBM 2260 Local, the message is displayed 
beginning at a point determined by the WRT60 operand of the MODE 
macro instruction. The message overwrites existing characters in 
the display screen, including messages in preparation or messages 
entered but not yet read by QTAM. 


4. If the device is an IBM 1053 printer, the message is transferred 
whenever the printer buffer becomes free. The Supervisor restarts 
the channel program automatically if the printer is busy, but the 
line group is not freed for other messages until the message has Ss 
been sent. 


5. if the printer is not ready (intervention required), the operation 
is posted complete-with-error. 


Write Initial: A write initial is issued to send a message to an IBM 
2260 Local or to an iBM 1053 printer. If the message is to an IBM 2260 
Local, the display begins at the current location of the cursor. 
Messages to the printer start at the current location of the IBM 
Selectric type element (normally at a new line). The channel program 


is: 

Saas ace again eee aaianies hea oe i aie eee 7 aS ees A oe ee 1 
| Operation | Address | Flags | TP Code | Count | 
~------------- --------- t------— $--------- +-------- 
| Write Buffer | Area | CD,SLT | 03 | Length | 
eee el enraed eee ie eer eet beeps ee ein cs B eres ee eee eae beeen aes nene eee pee eee ee Ree J 


Erase/Write: Erase/Write may be specified instead of Write Initial by 
the MODE macro instruction. The command is valid only to an IBM 2260. 
The screen is erased and the message is displayed beginning in the upper 
left-hand display position. The channel program is: 


a |, aaeeueaacincaicss : aren De ene 1 

| Operation | Address | Flags | TP Code | Count | 

~------------- }---------4------—-+}~--------}-------- 

| 1. Erase == {| cc,SII | 00 | 01* { 

| 2. Write DS | Area } CD,SLI | 03 | Length | 

| Buffer | | | | 

Peat ee eee Kees ae end b aeeerener ees B Generar ere De esis J a 
*Dummy count \ 
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Write-at-line-address: Write-at-line-address may be specified in place 
of write initial by the MODE macro instruction. The command is valid 
only to an IBM 2260. The first byte of text is interpreted as the line 
address, and the message is displayed beginning at that line. The 
channel program is the same as write initial except that the command 
code is write-at-line-address. 


AT&T 83B3--Programming Information 


1. An AT&T 83B3 Teletypewriter Selective Calling System Control 
Station controls up to 38 teletypewriters ona line. The teletypes 
may be: 

a. Model 28 Receive Only Typing Reperforator (ROTR) ; 
b. Model 28 Automatic Send Receive (ASR); or 


c. A combination of the two models. 


2. Transmission between the 270x and the terminal is in Baudot code. 
The shift character conversion is a standard feature. 


EN 
= 
\ 


3. The Transmitter Start Code (TSC) is a two-character code the 
function of which is similar to polling characters in IBM 
equipment. The Call Directing Code (CDC) is a two-character code 
the function of which is similar to addressing characters in IBM 
equipment. 


aa) 
< 


4. Response to TSC (polling) 

a. Positive response is the message itself. 

b. Negative response is V. The channel-end and device-end status 
bits are set. Unlike IBM terminals, there is no unit exception 
with negative response. When the terminal is not ready, no 
response character is sent. A 2 second timeout occurs and unit 
check is set in the status byte. 

5. Response to CDC (addressing) 


a. Positive response is V or M. 


b. No response is a negative response = 2 second timeout and unit 
check. 


ATET 83B3--Terminal to CPU 


Read Initial: A Read Initial is issued to start or restart polling. 
The channel program is: 
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(ee eg eee een ee Rg eee er ge ey ee eo 1 
| Operation | Address | Flags ] TP Code | Count { 
|~---------------- +----~----4--------- +--~------ fo-----+---- { 
| . | | | | | 
[1. Write EOT | | | | | 
| sequence | Table | CD,SLI | 0 | 3 | 
| | | | | | 
|2. Write TSC | List | cc,SLI | 0 | 2 | 
| | | | | 
{3. Read response | Area | CD | Poll- | 2 | 
| | | | } restart | | 
| | | | | | 
{4. Read Message | Areat2 | CD. {Read Data| Length-2 | 
ele epee nel nen rere tee An hepa e nee ee Eten ee ante neon A re cl a ie a 


AT&T 83B3--CPU to Terminal 


Each terminal on a line has a unique two-character Call Directing Code 
(CDC). 


Write Initial: A Write Initial is issued to send a message to a 
station, The channel program is: 


ac aaa aga a a dar ea ee aa an ea ae eae ae ear 1 
| Operation | Address | Flags | TP Code | Count | 
p--—--~—-=—-------- {—=-==--=+ 1 Giacoa earners +--------- $----------— 4 
| | | | | 
{1. Write EOT | | | | | 
| sequence {| Table | CD,SLI | 0 | 3 | 
| | | | | 
|2. Write CDC {| List | CD | 0 | 2 | 
| | | | | | 
[3. Write shift {| Table | Cc,SLI | 0 | 1 | 
| character | | | | | 
| (ltrs) | | | | | 
| | | | | 
{|4. Read response | Area | cc } Multi- | 1 | 
| character | | | address- | | 
| | | {| ing | 
| . | | | | 
{5. Write message | Area | CD { Write | | 
| | | | Data | Length | 
eae ee ae nen PRONE enya es aoe ee ate estes Se ed net eee EO fee eee ee Ste TN cae eet ge J 


Western Union 115A--Programming Information 


1. Plan 115A is a multidrop system. Up to 20 way stations can be 
accommodated on a line. A way station is a Model 28 Teletypewriter 
Automatic Send Receive (ASR) associated with a way station 
selector. 


2. Transmission between the 270x and the terminal is in Baudot code. 
The shift character conversion iS a standard feature. 
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Fe ee a ne ee ee ee Seer 
10 1234567 System/360 byte | 


3. The invitation-to-send code is Similar to polling characters: 
The first character is an "X°. 
The second character identifies the station. 
The call code is similar to addressing characters: 
The first character is a line control character "circuit call". 
The second character identifies the station. 

4“. Response to invitation to send (polling): 

a. Positive response is the message itself. 


bk. Negative response is V, which generates the channel-end and 
device-end status (no unit exception is set as with IBM 
terminals). 
c. No response: 2 second timeout and unit check. 
5. Response to call (addressing): 


a. Positive response is "V.' 


bk. When the terminal is not ready, no response character is 
received. 


6. ‘The EOT Sequence is tH which sets channel end, device end, and 
unit exception status. (t= upshift or "FIGS"; = downshift or 
"LTRS.") 


7. The first character of the message must be an EOA, which generates 
a Space. The last portion of the message is an FOT sequence, which 
disconnects the station. 


WU Plan 115A--Terminal to CPU 


Each terminal on a line is “invited to send" with a two-character code. 
The first character is always X. The second character identifies the 
terminal. 


Read Initial: Read Initial is issued to start or restart polling ona 
line. The channel program is: 
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Seen aaa RR aE 5 es cd ae foo ee ay a se Te ee ey 1 
| Operation | Address | Flags | TP Code | Count | 
|----------------- +--------- +---—----- +--------- $----------- { 
| | | | | | 
{1. Write EOT | | ] | | 
| sequence {| Takkle | CD,SLI | 0 | 9 | 
| | | | | | 
{2. Write “Invita-| List | Ccc,SLI | 0 | 2 | 
| tion Code" | | | | | 
| | | | | | 
{3. Read Response | Area | CD | Poll- | 2 | 
| | | | restart | | 
| | | | | 
{4. Read Message | Areat2 | CD ]Read Data| Length-2 | 
Cees ee Fe a Lc ere enone ee Mi aac Rata ees oe eee 4 


WU Plan 115A--CPU to Terminal 

Each terminal on a line is addressed by a two-character call code. The 
first character is the line control character circuit call. The second 
character identifies the terminal. 


Write Initial: A Write Initial is issued to send a message. The 
channel program is: 


eS SS ee ® emma maad is ee a Se oo ae 1 
| Operation jAddress | Flags | TP Code | Count | 
|------------------ 4-------- ¢--------- +--------- {----------- { 
| . | | | | | 
{1 - Write EOT | | | | | 
| sequence | Table | CD,SLI | 0 | 9 | 
| | | | 
|2. Write call code} List {| cc,SLI | 0 { 2 ] 
| | | | | | 
|3. Read response | Area | CC |} Multi- | { 
| | | | address-| | | 
| | | } ing | 1 | 
| | | | ee | 
{}4. Write message | Area | CD | Write | | 
| | | | Data | Length | 
le he oh ea es S| Cee ae eee RS ors a oa See hties a i doe Sate J 


IBM 1050, Nonswitched--Terminal to CPU 


Each component on a line is polled with a two-character code. The first 
of these two polling characters identifies the terminal; the other 
either selects a device or is the common polling character (0). 


Read Initial: Read Initial is used to start or restart polling ona 
line. The channel program is: 
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Se a 5 Reape eacuC on Me ee am aa elec chania Ero a 1 
| Operation | Address | Flags | TP Code | Count | 
}------------------ +--------- +--------- }--------- +----------- 
| | | | 

[1. write © © @| Table | cD,SLI | 0 | 3 | 
| | | | | 
{2. Write polling | List | cc,SLI | 0 | 2 | 
| characters | | | | | 
| | | | 
{|3. Read response | Area | CD | Poll- | 2 | 
| | | } restart | | 
| | | | | 
}4. Read message | | | | | 
| block {| Areat2 | CD | 0 {| Length-2 ] 
See ARON RI Pe Ele ae ee ae fare ree ee ee be a ee er es 5 ets ae earner eae Eee een eae one J 


Auto Poll Read Initial: Used to begin polling on the Auto Poll line. 
The channel program is: 


ape eee recone 7 
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| 
ee a es a 
| 
| 1 |write © ©©O |Table icc,SLI| oO | 3 
| | | | | | 
| 2 {Poll | Any entry in |CC,SLI] 0 {k Cn) | 
| | {polling list | | | ] 
| | | | | 
| 3 {TIC {2nd POLL { SLI | 0 { 1 | 
| | | Command | | | 
| | | | | | 
4 | TIC {Read Response | | | | 
| | | | | | | 
| 5 {Poll [ist entry in |CC,SLI| 0 | k(n) ] 
| | jpolling list | | | | 
| | | | | | 
| 6 {TIC {2nd POLL | SLI | 0 | 1 | 
| | | Command | | 
| | | | | 
| 7 {Read Response |Area | CD | 1 { 2 ] 
| | | | | 
| 8 {Read Message Block|Areatl {| CD | 3 | Length-2] 
eee: pera ene (Ree a ere ees oc ee a sae arean nem een ene i eee 1 eae eee eee Die Seal J 


Read Continue [=wRITE () + READ Data]:. The Read Continue is requested 


ae EO rou EE pee Mee, a IE SN RIAD 


from the EOB or EOBLC routine after a successful Read Initial or Read 
Continue operation to read subsequent blocks from the same component. 


The cnannel vrogram writes the positive response character and chains to 


a read command. The data received is either followed by a (®) or 
alone. To restart polling on the line, another Read Initial must be 
generated. 


Read Repeat [=WRITE (§)_+ READ Message block]: The Read Repeat is 
requested from the EOBLC routine, in the event of a tranSmiSSion error, 
to reread a message block. The channel program writes the negative 

response character and chains to a read command that specifies the same 


storage area aS in the previous operation. 


TBM 1050, Nonswitched--CPU to Terminal 





Each terminal on a line is addressed with a two-character code. The 
first of these two addressing characters identifies the terminal. The 
second selects one or all of the components of that terminal. 
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Write Initial: Write Initial is generated to send a message to a 
terminal. The channel program is: 


es eee ee (ieee reas Bee ee ee si sea 1 
| Operation | Address j| Flags | TP Code | Count | 
er ‘ea ‘al rT r 
|1. write © © ©] Table | cp | 0 | 3 | 
| | | | | 
{2. Write address- | List { CcC,SLI | 0 | 2 { 
| ing characters| | | | | 
| | | | | 
{3. Read response | Area | CE | Multi- | 1 | 
| to addressing | { | address- | 
| | | ing | | 
| | | | | | | 
[4. Write () | Table | cD | 0 bf 
| | | | | | 
|5. Write message | Area | CD | 0 {| Length | 
eee ak oe ee en ee eee een spear ian nea Poa f Rearrenne eecronatne S Rear ee neem Bs ter eae 4 


Write Continue: Write Continue is requested from the EOB or EOBLC 
routine to write another message block after a successful write-initial 
or write-continue operation. The channel program writes a message block 
and chains to the BRB/CCW to continue the operation. 


IBM 1050, Switched--Terminal to CPU 


Terminal to CPU transmission occurs as follows: 


1. Program issues a Read Initial referencing an answering-polling list 
to enable a line. Prior to the enable, no calls can be received by 
the CPU. 


2. Terminal operator calls the CPU when he has something to send. 
This completes the enable command, cauSing a device end-channel end 
(DE-CE) interruption. 


3. QTAM polls the terminal that dialed, using the polling characters 
Supplied in the polling list. If the terminal sends a positive 
response, a read CCW is executed to transfer the message block. 
The answering-polling list must contain polling characters of all 
the terminals that may call the CPU on this line. Normally, the 
common polling character 0 is used to poll all components on the 
terminal. 


Read Initial: A Read Initial is issued to start polling. The channel 
program is: 


Qe a eg es ee qs 5 aaa eae Lo 1 ee 1 
| Operation | Address | Flags } TP Code {| Count | 
|----------—--~---- }--------- {--------- $—-------- }----------- { 
fo | | | | | 
{1. Disable | {| cc,SLI | 0 | 1 | 
| | | | | 
|2. Enable | | SLI | Restart | A | 
| | | | | 
|3. Write pad | Table | CcC,SLI | 0 | 15 | 
| characters | | | | | 
oe see See eee mee Seay eels eter ie Sis andere ar a Ceara Wp eee in 5 Sea ee ae 4 
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Commands 4-7 are the same as commands 1-4 of read initial for 1050 
nonswitched. 


Read Continue [WRITE WW) + READ Data]: A Read Continue is requested 
from the #OB or EOBLC routine after a successful Read Initial or Read 
Continue to read the next block of data from the same comoonent. The 
channel program writes the positive response character and chains to a 


read command. 





Read Repeat {WRITE () + READ Data]: The Read Repeat is requested from 
the HOBLC routine after an unsuccessful read operation for 
retransmission of the data which was received in error. The channel 
program writes the negative response character and then cnains to a read 


command that specifies the same storage as the previous operation. 


IBM 1050, Switched--CPU to Terminal 


CPU-to-terminal transmission occurs as follows: 


1. The program issues a Write Initial referencing a call-addressing 
list to dial the terminal and address the component. 


2. if a positive response is received, the message is sent. If a 
negative response, the operation is posted complete-with-error. 


Write Initial: A Write Initial is generated to send the first block of 
a message. The channel program is: 


GS Sr a ee yc ager a ean | cameo aaa ag 5 aie ea rasan aa a ae aa 1 
| Operation {| Address | Flags | TP Code | Count | 
}------------------ }--------- $--------- }--------- +----------- { 
| | | | | | 
ji. Disable | ! CC,SLI | 0 1 | 
| | | | | 
[2. Dial the call | List | &,SLI. | 0 | n | 
| digits | . | | | 
| | | 

[3. write © © ©| Table | cD | 0 | 3 
| | | | | | 
{4. write address- | List | cc,SLI | 0 2 | 
| ing characters| | | | | 
| | | | | | | 
{5. Read response | Area | CC | Multi- | 1 | 
| to addressing | | | address-]} | 
| | | ing | | 
| | | | | | | 
Jo. Write message | | | | | 
| block | Area | CcC,SLI | 0 | Length | 
Ga eh ee ee Feet ae eRe tees OU eae ele te To ons 


n = number of dial digits as specified in the terminal table entry. 


Write Continue (Same as Step 6 of Write Initial): The Write Continue is 


requested from the EOB or EOBIC routine after a successful Write 
Initial, Write Conversational, or Write Continue operation to send the 
next message block. 


Write Conversational (Same _ as Steps 3-6 of Write Initial): This option 


provides the facility to readdress a terminal on a line with which 
connection is already established. 
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ATET TWX 33/35--Terminal to CPU 


TWX terminals are not polled. Line connection is established on 
terminal request; the terminal dials the CPU through a switched network, 
and the CPU answers the call. 


Read Initial: The Read Initial channel program is used when 
transmission is originated by the terminal operator calling the CPU. 
The type of polling list is an answer list which specifies that line 
connection must be established by the terminal, before data may be 
transmitted. The channel program is: 


Eten | f. Po fo. I a | 
| Operation | Address | Flags TP Code | Count | 
|------------------ $--------- +--------- +-----—--- +----------- { 
| | | | | | 
{1. Disable | {| ccC,SLI | 0 | nf | 
| | | | | | 
{2. Enable | | SLI | Restart | 1 | 
| | | | | | 
{3. Write CPU-ID | | | | | 
| sequence | List {| cc,SLI | 0 | m | 
| | | | | | 
{|4. Read Response | Area | CD {| Poll- | 2 { 
| | | j restart | | 
| | | | 
|5. Read data | Area-2 | CD j Read | Length-2 | 
| | | | data | 
ati ae ee eee el Y depen eee oa see i een oe ener tee Gee J 


m = count of characters in the CPU ID sequence specified in the polling 
list for the line. 


TWX Model 33/35--CPU to Terminal 


TWX terminals are not addressed. Line connection is established on CPU 
request; the CPU calls the remote terminai through a switched network. 


Write Initial: The Write Initial channel program is used when 
transmission is to be originated by the CPU calling the terminal. The 
type of terminal list is a call list which specifies that line 
connection must be established by the CPU, before data may be 
transmitted. The channel program is: 
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Po eee, Mcecen a a | 
| 

| Operation | Address | Flags | TP Code | Count ] 
|------------------ {--------- {--------- +--------- +~---------- { 
} | | | | | 
{|1. Disable | | cc,SLI | 0 | 1 | 
| | | | | 
{|2. Call the dial- | | | | | 
| digits | Last | CC,SLI | 0 n | 
| | | | | 
{3. Read terminal | List | cC,SLI | TWX ID | m | 
| ID Sequence | | | | 
| | | | | | 
{4. Write data } Area | CD | Write | Length } 
| | | data | | 
Be ee Ease el ee fe Grepereaceneenen Oa eetet ee eee sel ae See J 


n = specifies the number of dial digits in the terminal table entry. 


m = specifies the number of characters in the TWX terminal ID sequence. 


Write Conversational [WRITE Data]: Write Conversational can be used 
following Read Initial, Write Initial, or a previous Write 
Conversational. The channel program consists of a single command. The 
data transmitted must not end with a turn-around character. 


Ee 


id 
Shh 
Ts! 


TBM 2740 Remote Terminals 


There are eight different types of IBM 2740 terminals, depending on the 
features provided. Each terminal uses a different set of commands. 
Eight modules are provided (IJLQNO - IJLON7), one for each terminal (see 


Figure 9). 

fo eS Rr ee ee ee 6 aera eae: 1 
[IBM 2740 | | Associ- | 
| Terminal | | ated | 
| Type | Features Provided | Module | 
[-------- t-~----~------~---~------------------- 4--------- : 
| | | | 
| 274A |Basic Type | IJLONO | 
| | | 
| 274B |Basic, Dial |} IJLON1 | 
| | | | 
{| 274C |Station Control } IJLQN2 | 
| | | 
| 274D |Station Control and Checking |} IJLON3 | 
| | 
{| 274E |Dial, Transmit Control and Checking | IJLON4 | 
| | | 
| 274F |Checking | IJLONS | 
| | | 
| 274G {Dial with Checking | IJLON6 | 
| | | 
{| 274H |Dial, Transmit Control {| IJLON7T | 
Disease ee BN a re he Dist esac eas aa J 





Figure 9. Types of IBM 2740 Terminals with Associated Modules 
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IBM 274A (Basic) - Terminal to CPU 


Read Initial: 


fae ae a oe 5 acinar laa ee qo 1 
|Command | Operation |Address| Flags | TP Code | Count | 
| 1 £|write © © © | Table | cc,SLI] 0 | 3 | 
| | | | | | | 
| 2 |Prepare for | | | | | 
| | Receipt of Data | | cc,SLI| 0 | 1 | 
| | | | | | | 
| 3 |Sense | LSEN | CC,SLI| 0) | 2 | 
| | | | | | 
| 4 |Read Data | Area | CD |Read Data | Length | 
betes a topo eee i (ae mee re pene ene I ae a it pone eer anon eee J 


Command 1: Sends three @©'s to set all terminals on the line in 
control mode. 


Command 2: Indicates to the CPU that data is arriving. (No data 
transfer occurs with this command.) 


Command 3: Indicates to QTAM whether or not the Prepare command has 
completed for STOPLN-STARTLN logic. 


Command 4: Reads text until the count is exhausted and chains through a 
TIC placed after it to the second BRB/CCW in the ring. If a 
buffer is not requested for the second BRB/CCW, the PCI flag 
causes an interrupt on command 4, and the PCI routine is 
entered to obtain a buffer. If the buffer is requested but 
not assigned, the TIC command has an invalid address which 
causes a program check interrupt. The Line End routine 
recognizes this condition and obtains the buffer. 


IBM 274A (Basic) - CPU to Terminal 


ara a ye : eae cana fo ee ee ey re ee 1 
{| Command | Operation |Address| Flags | TP Code {| Count | 
}------- 4--------~--------- +------- +------- +--------------- }--------- { 
| _— | | | | | 
| A [Write | | | | | 
| | followed by 15 | | | i | 
| | idle characters | Table | cD | 0 | 16 | 
| | | | | | 
| 2 [Write Data | Area | CD |Write Data {| Length jf 
Bo eave pia a Sa as Se Meet ete: fC ieee eae ae ee a oe a ree Pee ces 


Command 1: Write indicates that the following characters will be 
text. Transmission of idle characters insures that the 
terminal has time to prepare to receive. 


Command 2: Writes text until the count is exhausted. 
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IBM 274B 


po eeeee 
1 


2 


| 
| 
| 
| 
| 
| 3 
| 
| 
| 
! 
| 


(Basic/Dial) - Terminal to CPU 


tial: 


Read Ini 


Operation 


+ Sis cs aa es es ae a al 


| 
| Disable 


| 
| Enable 


|Prepare for 
Receipt of Data 


Sense 


ee Ee RES eee AERP TS UD ce ate qe ame coe wom ete cee aiete co a 


be 


fp me ae a a 


‘eee tee ae pete ee 
Flags | TP Code 
Sepeee capes Bh Sh alee 
| 
cc, SLI | 0 
| 
CC, SLI | Restart 
| 
| 
cc, SLT | 0 
| 
CC, SLI | 0 
| 
CD |Read data 
aie ee at 2 a Sk 
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IBM 274B (BaSic/Dial) - CPU to Terminal 


A BT ER, OUI ent JOA 


(oe aes ee ee ee Ce Too ; anne aiaaaaae 1 
{| Command | Operation {|Address| Flags | TP Code | Count i 
}------- {------------------ $------- +------- 4--------------- $--------- { 
| | | | | | 
| 1 {Disable | | cc,SLT | 0 | 1 | 
| | | | | | | 
| 2 |Dial | | cc,SLI|{ 0 | Length | 
| = | | | | | 
| 3 {Write Pad | | | | 
| | Characters | Table | Cc,SLi| 0 } 15 | 
| | | | | | | 
| 4 |Write © | | | | | 
{ | followed oy 15 | | | | | 
| | idle characters | Table | CD | 0 {| 16 | 
| | | | | | | 
| 5 [Write Data | Area | CD |Write Data } Length | 
eae epee Bae oe y Ene ane aS fees errand caer ee bee ei J 
Write Conversational: Same as Commands 4 and 5 of Write Initial. 
IBM 274C (Station Control) - Terminal to CPU 
Read Initial: 
aaa a Asner ae en aan aaa pen aia aac Me ete pr a amar cca asens 1 
{Command | Operation |Address| Flags | TP Code { Count | 
peste pain $------- ae $--------------- +--------- { 
| | | | 
| 1 |write © ©@© | Table | cp | 0 |} 3 | 
| | | | | | | 
| 2 [Write Polling | | | | | 
| | Character {| List | CD | 0 | 1 | 
| | | | | | | 
| 3 {Write Space | Table | CC,SLI] 0 | 1 | 
| | | | | 
| uy |Read Response | | | | | 
| | Character | Area | CD |Poll Restart | 2 | 
| | | | | | | 
| 5 j|Read Data |} Area | CD |Read Data | Length-2] 
epee mean fee een ae Rader ene en ee eee eat ee y ieee eee dole See pa aaa ree eee eee \ Re eager a eo J 
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CS a a ee ee es | ee ee ee ee ee Se ee eee “ 
| | N | 
| | t | 
| | & | 
i+ | | 
ts tl ~ o~ ™m | 
(= Sy ee ee a . 4 N | 
; oOo | ~ ~ Gv | 
= pv a ra] 
bp EE 4 
| | ] 
| | | 
| | | 
| | i 
} vo | | 
1c I | 
1o | | 
10 ! >) ro) > o>) oO cr) | 
1 Ay | | 
ie | | 
| | | 
| | | 
| | | 
| | | 
-— + SS Ee SS ee + 
| 1 H be ke | 
In | HI = | J | | 
1m I isp) 1) 4 ep) 1 -A OQ 1 
|} @o | . . wn * ep) '/) YO | 
i ee | Q) O ‘fo. | 
| fou | ') '}) Oo | 
ee Ee eee ee ee + 
| | v | 
on? | mM ; i) on) se) | 
init S ps c co S So | 
; ovo | <0) | © oO Nord © + | 
IM | rc M4 ob <n 2 @ ey Bi Ww oo YP a 18) oe | 
1 oO | Q mn 4 au TW 4 Ou VW ow OHeEe oD) oO | 
Boar © GESQOH FOO VU NEE GH FOO 8 HI 
lq EB QVvH WH NDWO Me AVA DA NAY | 
-e—+ — e-em ef eee ee ee 4 
| i ad | 
| | O | 
tI ci 
oe i | mo | 
- |_| @ mw | 
Ta 1 oOo c ™m | 
: Fie ae 
| Suutd 
S 1 oO | ap) wf) | 
| | <0) oO | 
1 Oo | ~ = | 
ue) 1 Qu <9) | 
8) tO 4 Py re ro Oo DO I 
cd) | f ed oe ©) UY ro ‘o) 10) oS | 
% { | 4 .@) ba t4 e) KH co) Yo | 
| | 2 Ay EH EX Ay al ad ~m | 
qo et -  S  S S  S e e C e e e - > 4 
oat 1d i | 
Ol bh Se | 
Ay! i eo | | 
1&4] _ N an) =r Ye) oO ™ co | 
oO 1 & | | 
{ 1 oOo | | 
= £4 | 
ra fee oe eke —e SS ee eee eee ee eee eee eee eee eee ee eee ieee eee ee eee eee aw 
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IBM 274C (Station Control) - CPU to Terminal 


Write Initial: 


" apmigeanes Se oy. : TOR is Fa 7 Sauer ore ai aaae 1 
{Command | Operation {Address| Flags | TP Code | Count | 
}------- +------------------ +------- +------- 4--------------- penaes 
| | | | | 

| 1 |Write © © ©@| Table | cp | 0 } 4 | 
| | | [ | | | 
| 2 |Write Addressing | | | | | 
| | Character {| List | cD | 0 | 1 | 
| | | | | | | 
| 3 [Write Space | Table | cc,SLI] 0 | 1 | 
| | | | | | | 
| Ly {Read Response | | | | | 
| | Character | Area | CC |Multiaddressing] 1 | 
| | | | | | | | 
| 5 [Write Data {| Area | CD |Write Data | Length | 
a See ae ene ee a eae tesa hee ere aA ata tat qo ena f nae eee emesis neat ere eee J 
IBM 274) (Station Control and Checking) - Terminal to CPU 

Read_ Initial: 

a {os eo 1 Too or Re er en sata eacaraniaae ind 1 
| Command | Operation |Address| Flags | TP Code { Count | 
}------- {------------------ $------- +------- $--------------- +--------- { 
| = | | | | | 
| 1 |write © © © | Table {| cd | 0 | 3 | 
| | | | | | | 
| 2 |Write Polling | | | | | 
| | Character | List | CD | 0 i 1 
| | | | | | | 
| 3 |Write Space | Table | CC,SLI| 0 | 1 | 
| H | | | | | 
| 4 |Read Response | | | | | 
| | Character {| Area | CD |Poll Restart | 2 | 
| | | | | | | 
| 5 {Read Data jAreat+2 | CD {|Read Data | Length-2| 
epee eee casa eens ee A nae eee dom i nay eee as ees Sees 5 oie een ee J 
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Auto Poli Read Initial: 


| Command | Operation 


| 
| 
| 
| 
| 
| 
| 


b> 


NO 
rg 
e) 

- 
a) 
5 
he! 


Jin 
{polling 
{list 

| 
{2nd 

| POLL 

| Command 


a 
| 
+ 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 

| | 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
i 


ae 
re 
Q 
op 
ay 
be 


|Read 

| Response 
| 
jist 
{entry 
jin 
jpolling 
{list 

| 
j 2nd 

| POLL 

| Command 


Read Response | Area 


k(n) 


td 
e) 

2 
bs 


=_ 
fb — — — — — — — — — — — 
H 4 
Fi eH 
QO QO 


Read Message Block|Areatl 


| 
| 
| 
| 
| 
| 
| 


be YH 4H 


i 
! 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
be 
| 
| 
| 
| 
| 
| 
| 
| 


Read Continue: 
Gp ee i aaa ama Da ai ela asc acs 
| Command | Cperation 


ere SET mein APRON. mre ee AG I ee test se 
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IBM 274D (Station Control and Checking) - CPU to Terminal 


Write Initial: 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
1 
| 
| 
| 
i 
| 
| 
| 
I 
| 
- 
| 
| 
| 
! 
| 
! 
| 
-| 
| o 
1 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
i 
| 
| 
| 
od 


| Command | Operation j|Address| Flags | TP Code { Count | 
}------- $------------------ +------- +------- pererveaarte +--------- ] 
| | | | | | 
| 2 |write © © © ©] Table | cD | 0 | 4 l 
| | | | | | | 
| 2 |Write Addressing | | | | 
| |} Character {| List | cD | 0 | 1 | 
| | | | | | | 
| 3 {Write Space | Table | cCC,SLI| 0 |. 41 | 
| | | | | | 
| 4 |Read Response | | | | | 
| | Character {| Area | cc |Multiaddressing| 1 | 
| i. | | | | | 
| 9 |Write | | | | | 
| | followed by 15 | | | | | 
| | idle characters | Table | cD | 0 {| 16 | 
| | | | | | 
| 6 {Write Data | Area | CD |Write Data | Length | 
Beira ae See ee ete en ee ee ee 1 ieereer earn i eae eae a 5 ae eee ee ee Maes ee 4 


ae, SA ose, GN ema 
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IBM 274E (Dial, Transmit Control and Checking) - Terminal to CPU 


Read Initial: 


r T 
| Command | Operation 


|------- }------------------ 
| | 

| 1 | Disable 

| | 

| 2 | Enable 

| | 

| 3 |Write /,Space 

| | 

| 4 |Read Response 

| | Character 

| | 

| 5 |Read Data 

Bee SD i ah ha oe eae 


Read Continue: 


ea eta as (Sea ee ee 
{Command | Operation 
}------- $------------------ 
| = 

| 1 |Write (y) 

| | 

| 2 |Read Data 

peer cree ee as ot Sa 


Read Repeat: Write (N) followed py Command 2 of Read Continue. 


eat REN ware I 


TP Code | 

Sea 1 

| 

0 | 

| 

Read Text | 

ere a eS L 





aaa aa a 1 
Count j 
ein a 4 
1 

| 

1 

2 

2 ] 
Length-2] 
EE na ee eee J 
Soe 1 
Count | 
~------ { 

| 

1 | 

| 

Length | 
eases esl sel ae J 
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IBM 2748 (Dial, Transmit Control and Checking) - CPU to terminal 


Write Initial: 


Gaaae ea ee ee re eo De eo ee ae | Ga Saaeicanen 1 

| Command | Operation {|Address| Flags | TP Code {| Count 

}------- {------------------ $------- +------- }--------------- $--------- { 

| | | | | | 

| 1 {Disable | | cc,SLI] 0 | 1 

| | | | | | 

| 2 {Dial l | cc,SLI] 0 | Length 

| —_ | | | | 

i 3 |Write pad | | | | 

| | Characters { Table | Cc,SLT] 0 | 15 

| | | | | | 

| 4 |Write | | | | 

| | followed by 15 | | | | 

| | idle characters | Table | CD | 0 | 16 

| | | | | | 

| 5 JWrite Data | Area | CD |Write Data | Length 

ere nrere rien Se Ng eS ane i Paeeeenear es Serna een y oR em WU a is a a i eae eed eee 

Write Continue: Same as Command 5 of Write Initial. 

Write Conversational: Same as Command 5 of Write Initial. 

IBM 274F (Checking) - Terminal to CPU 

Read Initial: 

aE Me Pr er en on ae 7 aaa aaa aia are ee 2 Saat a 1 

j Command | Operation {|Address| Flags | TP Code {| Count 

ee ae rE as es _—_ 
| 

| 1 |Write © @©© | Table | CC,SLI] 0 | 3 

| | | | | | 

| 2 |Prepare for | | | | 

| | Receipt of Data | | CCysLLi 0 | 1 

| | | | | | 

| 3 | Sense {| LSEN | cC,SLI] 0 | 2 

| | | | | | 

| u |Read Data {| Area | CD |Read Data |} Length 

ne are ane OO i Se ae he tet S Seaemeneresy 5 Deena ante ey ae en ee een eee eae Serene ere ee eee 


Read Continue: Write (@ followed by Command 3 of Read Initial. 


Read Repeat: Write () followed by Command 3 of Read Initial. 





152 GOS QTAM Program Logic Manual 


( 





/  -JBM.274F (Checking) - CPU to Terminal 


Write Initial: 








aciaais Were eee eg ; ari naa res re Po ee co en 1 
| Command | Operation {|Address| Flags | TP Code {| Count | 
}------- +------------------ +------- +------- $--------------- +--------- { 
| — | | | | | 
| 1 [Write | | | | | 
| | followed by 15 | | | 
| | idle characters | Table | CD | 0 | 16 | 
| | | | | | 
| 2 |Write Data | Area | CD |Write Data | Length | 
nen eee MS sheets eee Pia ed eer as pe prereset eee ee Te eee! Getbawen tao 
Write Continue: Same as Command 2 of Write Initial. 

Write Conversational: The same Commands as Write Initial. 
IBM 274G (Dial and Checking) - Terminal to CPU 
Read Initial: 
Be qe se eg arte mre ee ee gee ee eng ee ee ee De ee ee 
| Command | Operation |Address| Flags | TP Code } Count ] 
ee eee {------------------ ------- t------- +-~------------- $--------- { 

4 | | | | | | | 

4 | 1 | Disable | | cc,SLIi| 0 ] 1 j 

” | | | | 
| 2 | Enable | {| CC,SLI|Restart ] 1 | 
| | | | | | 
| 3 |wWrite © @©© | Table | CC,SLI| 0 , 3 
| | | 1 | | 
| 4 |Prepare for | | | ] j 
| | Receipt of Data | | cc, SLI | 0 | 1 | 
| | | 

[| 5 |Sense | LSEN | CC,SLI]| 0 | 2 | 
| | | | | 
| 6 |Read Data | Area | CD |Read Data ] Length jf 
Sonera Oa MWe pon ere a ny ovate pre aver geeres : epee eee yeaa eer eer Bb i td aera eon otra (Seen ey eeierareerocrn J 


Read Continue: Write @) followed by Command 5 of Read Initial. 


Read Repeat: Write @) followed by Command 5 of Read Initial. 
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IBM 274G (Dial and Checking) - CPU to Terminal 


aceite Initial: 


aaa owceien Ses are ees ee Re 5 Seam aes fee ee {or Se 
{| Command | Operation | Address| Flags | TP Code 1 Count 
}-------4------------------ +------- +------- }-~------------- ¢--------- 
| = | | | | 

| 1 |Disable | {| Ccc,SLI| 0 | 1 

| | | | | | 

| 2 {Dial | | cc,SLI| 0 | Length 

| i | | | | 

| S: {Write pad | | | | 

| | Characters | Table | CC,SLI| 0 { 15 

| b. | | | | 

| uy {Write | | | | 

| | followed by 15 | | | | 

| | adle characters | Table | CD | 0 | 1 

| | | | | | 

5 {Write Data | Area | CD |write Data | Length 
eta ee a eer oe ee eee et See etek i Sp eect seen ee oe eNO eR Nes oS sao aren 


Write Continue: Same as Command 5 of Write Tritial. 


Write Conversational: Same as Commands 4 and © of Write Initial. 
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IBM 274H (Dial and Transmit Control) 


Read Initial: 


pa Sag ee Sea eee 
| Command | Operation 
}------- {--~--+-~---------- 
| [ 

| 1 |Disable 

| | 

| 2 | Enable 

| | 

| 3 {Write /,Space 

| 

| Ly |Read Response 

| | Character 

| | 

5 {Read Data 

L 


IBM 274H (Dial and Transmit Control) 


Write Initial: 


Gane og Ds Og a ee ee 
| Command | Operation 
}~------ }------------------ 
| = 

| 1 | Disable 

| | 

| 2 | Dial 

| | 

| 3 |Write Pad 

| | Characters 

| | 

| 4 {Write Data 

L 


Write Conversational: 


World Trade Telegraph Terminals 


oe 


- Term 


SLI 


CC, SLI 


CD 


= CPU 


inal to CPU 


See EE SEP CEES SS ES SE CD ED ED Ee eS 


{Restart 
| 
| 0 
| 


{Poll Restart 


{Read Data 


to Terminal 


ene ER a EE AOD ED ey en eee ee eee ee ee 


| 0 


| Write Data 
Me A td arate he 


Same as Command 4 of Write Initial. 


ee 


a 


2 


The channel programs for terminal-to-CPU transmission (Read Initial and 
Read Continue) and for CPU-to-terminal transmission (Write Initial) are 
made up of two parts: 


channel program automatically associated with the second part to 
perform identification sequence exchanges, whenever requested, 
during message transmission. 


receive input messages or to send output messages. 


Read Initial: 
character sent by the terminal. 
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The first part (identification-exchange channel program) is an inner 


The second part (Read or Write channel program proper) is set up to 


A Read Initial is issued to enable the CPU to receive a 
The channel program is: 


qa T 
| 


we <ORD OEED GOED GED RD EEN ND GRE eeets SEED OD eee EP eee ae ae ee ——_— cee ae ome ewe a cee ae ee ee a ee eee OS AAD ED COD ED ee ED ean “SO EE ae ie ee eee ——e ee ame wae ee oe oe 


| Command Operation {Address| Flags | TP Code } Count 

}~------}~--~-------- ~~ -- ff nnn nnn 
| | | | | 
| 1 {Write CPU-ID | | | | 
| | sequence (Note 5)|{ List | CD SLI| 5 i n | 
| | | | | | 
| 2  |Write (Note 3) | WRU | CC SLI| 0 1 { 
| | | | | | 
| 3 {Read Terminal- | | { | | 
| | ID (Note 6) | List | SLI | 5 } Length-1] 
}----~-~— }------------—---- ----—- +-—-—- {-—--------~~--- $-------~ 4 
| | | | | | 
| 4 | Prepare | O | Cc SLI| 0 [ 1 | 
| | | | | | | 
| 5 jSense (Note 1) {| LSEN [| CC SLI| 0 | 1 | 
| | | | | | 
| 6 | Read {| Area | SLI | 3 |} Length |] 
ema oe ema eg TT Gener iene gaan een tees ae eee as 1 pee eee eae J 


Read Continue: 


A Read Continue is issued after an EOM Signal to read 


the next input message, or after a WRU Signal to read the rest of the 


input message. 


ae ‘a 
| Command | Operation 
i. oes 
| 1  |Write CPU-ID 

| | sequence (Note 5) 
| | 

| 2 {Write (Note 3) 

| 

| 3 |Read Terminal- 

| | ID (Note 6) 
|-—---~~ f----------------— 
| | 

| A | Read 

Sees eee ee ye ape lente Peer eae ee 


Write Initial: 
The channel program is: 
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The channel program is: 


a a 


SE IS RE OR ED EE ON HEE a aia CREE NARS cee tthe: 


a a em ee cee eee ce eee eee cme eee ee ee ee 


rs oe 


Count | 
-------- { 
n | 

1 | 
Length-1 | 
-------- { 
| 

Length | 


A Write Initial is issued to send an output message. 


Shee AD EP ED eR ERED iD RD eee anne cette <a can ee ee 





Fefen ts i. eC tape 2 Me ! Po 
iCommand| Operation |Address| Flags | TP Code { Count | 
}------- +------------------ $------- }------- }--------------- }--------- { 
| | | | | | | 
| 1 {Write (Note 2) { Table } CD SLI| 5 | 1+m j 
| | | | 
| 2 {Write (Note 3) {| Table { CD SLI| 5 | 12 | 
| | | | | 
| 3 {TIC (Note 4) | | | | 
| | oo. | | | 
l 4  |Write CPU-ID { List | CD SLI] 5 n 
| | sequence (Note 5) | | ] | 
| | | | | 
| 5 [Write (Note 6) | WRU {| cc SLI 0 i] | 
| | | | | 
| 6 {Read Terminal-ID | List | SLI | 5 | Length-1 | 
| {| (Note 7) | | | H | 
t------- {------------------ +----—-- +------- +--------------- {--------- { 
| | | | | | | 
| 7 | Write | Area | SLI | 3 ] Length | 
eee Hae es See iene ie eee 5 Span ene see Ni seis poh tetas ca nceb tee nies Ms ack ato J 


Note 1: LSEN is the address of the sense byte in the LCB. This byte is 
set to X'FF' before the Read Initial channel program is set up. When 
the SENSE command is executed (that is, when the terminal starts sending 
an input message), the LSEN byte is overlaid by the adapter sense byte. 


Note 2: One LTRS character is sent which may be followed by "m" padding 
characters if the line is defined as an output line only with the 
"motor-off" option. 


MI 


Note 3: Twelve (12) LTRS characters must be sent at the beginning of 
each output message. 


Note 4: The transfer address in the TIC CCW is that of CCW no. 3 or 
that of CCW no. 6, depending on whether or not the WRU macro instruction 
is present in the Send-Header subgroup of the LPS. 


Note 5: The computer identification (CPU-ID) defined in the POLL macro 
instruction associated with the line is sent to the terminal. 


Note 6: When the Automatic Answerback Unit feature is installed on the 
terminal, the CPU sends the WRU signal to the terminal which, in turn, 
sends its identification sequence to the CPU. 


Note 7: The terminal identification is read into the area reserved by 
the TERM macro instruction associated with the line. 


LINE-~PCI AND PROGRAM CHECK MODULE 


Module Name: IJLQLC (Chart LB) 


Entry: This module is entered from IJLQLA when a PCI or CPC has 
occurred. 


This module disposes of the buffer filled or emptied by the channel 
@ | command preceding that which caused the PCI, and places a request for 
2 | the buffer that is to be emptied or filled by the CCW when it is again 
“| encountered in the ring. | 
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Graphically: 


This CCW-pair filled NS 
buffer @, which is 
to be disposed of. 


This CCW-pair is 
filling buffer ® and 
caused the PCI. 


This CCW-pair will 
fill buffer ©@, which 
must now be obtained. 





For receive operations, buffer @) is routed to the Interim-LPS 
queue. If the line is an Auto Poll line, the first byte in this buffer 
contains the index of the responding terminal in the polling list and is 
used to update the polling list pointer in the LCB. (If the index is 
not that of the terminal on which the polling operation was started, the 
message count is reset to zero in the LCB.) For send operations, the 
buffer is routed to the Available-Buffer queue. In either case, the 
request for buffer © is routed to the Active Buffer Request queue. 


This module may also be entered as a result of a program check 
occurring because a buffer was not provided on time, or because a CCW 
with a zero data count was accessed. The two low-order bits of the TIC | 
command in each BRB/CCW indicate BRB status. When a buffer has been 
allocated, these bits are set to zero. Because of timing 
considerations, a PCI flag in the CCW preceding a CCW containing a TIC \ 
may not interrupt the channel program before the transfer-in-channel 
command is accessed. If this happens before the required buffer has 
been allocated and the BRB status code has been cleared, the requirement 
that the TIC address be on a doubleword boundary is violated by the 
nonzero low-order bits and a program check occurs. Four possibilities 
arise: 





1. The check occurred on the TIC following the CCW for the last 
segment of an outgoing message. This is a normal Situation and is 
ignored. (The missing buffer is for the “next" segment and there 
is no next segment.) If this is not the case, the "start channel 
program" pointer (IJLQLCPA) is reset to the CCW to which the TIC 
command was to have transferred control; this anticipates 
correction of the condition. 


2. It is possible that through asynchronous operations a buffer was 
allocated, and the TIC address made valid, in the period between 
the program check's generation and its detection by the program. 
If this is true, the channel program is simply restarted. 


3. The process of allocating a buffer may already have been initiated; 
if so, the routine exits to the Supervisor to allow time for the 
_ process to complete. 


4. If the process of allocating a buffer has not already been 
initiated, the routine branches to the Line-PCI routine (at NOTINQ) 
to release the buffer filled by the CCW immediately preceding the 
TIC that caused the program check. 
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LINE APPENDAGE MODULE 


Module Name: IJLQOLA (Chart EG-EN) 
Entry: This appendage is entered from the supervisor. 


1. When a programmed-controlled interrupt (PCI) or channel program 
check (CPC) occurs during the execution of QTAM channel command for 
the line. 


2. When a channel end occurs during line I/O operation. 


When entered because of a PCI or CPC, control is passed to IJLOQLC 
after initialization of the register. 


Normally the routine routes a message-filled buffer to the LPS queue 
or exits to the supervisor to restore the channel program. 


When it is entered because of a negative response to polling, the 
routine resets the polling-list pointer to the next entry in the polling 
list before initiating restart. If the end of the polling list has been 
reached, the routine sets the “cleanup™ code in the LCB (LSTA = X‘'80'). 


For autopolled lines, when it is entered because the end of the 
polling list is reached (the channel program must have been previously 
modified to allow this interruption), the routine sets the LCB polling 
list pointer to the dummy “end-of-1list" entry and sets on the LCB 
cleanup code. 


Error recovery procedures are provided to perform tests on the status 
and sense bits to determine if a transmission error occurred on the 
operation. If so, the routine branches to an appropriate subroutine 
which attempts to recover from the error. 


Generally, if there has been no text transfer, the channel program is 
retried. If there is an error after three attempts to execute the 
channel program, the error is considered permanent. If a timeout or 
intervention required error occurs on a Switched line, the CSW is saved 
in the LSAV field of the LCB. A CCW to disable the line is set up as 
the first CCW in the channel program. A disable return (X"80') is set 
in the LERR+1 field of the LCR, and exit is made to the supervisor to 
execute the disable. 


A condition that should not happen is also considered a permanent 
error, and the “should not occur™ bit, bit 7, is set in the error 
halfword in the LCB. 


For all permanent errors, a message is written to the operator. The 
routine executes a branch-and-link to the Message Writer subtask 
(IJLQMW), passing parameters in standard registers. The Message Writer 
subtask builds an information block from the information in the LCB, and 
inserts a dummy ECB at the top of the Ready Queue, then returns to the 
Line Appendage routine. The routine releases the LCB and issues a QPOST 
to free the buffer. LPS Control recognizes the dummy ECB, and either: 


1. Issues a FETCH (SVC 2) to call Phase 1 of the Message Writer routine 
into the transient area, passing the address of the information 
block in register 0, or 


2. If the Message Writer is presently writing a message, stacks the 
message in a save area, issues a QPOST to post a dummy element to 
itself with a low priority, and exits to Qdispatch. When the 
Implementation module regains control, it again tests to determine 
if the Message Writer is occupied and repeats the sequence. 
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For certain types of error (data check, intervention required, and 
nontext timeouts), threshold line error counters are added to the 
cumulative counters, the threshold counters are reset, and an operator 
message iS provided. 


Error Recovery Procedure Subroutines 


For all channel status errors except unit exception (attention, status 
modifier, control unit end, program check, protection check, channel 

data check, channel control check, interface control check or chaining 
check), no retry is performed and an error message is immediately sent. 


A unit exception on a read, read response to poll, or enable is 
handled as other channel status errors. A unit exception on a write 
command is retried two times, with these exceptions: 


1. If a Teletype I adapter is on the line, a break command is issued 
and it is treated as a permanent error. No message is sent, 
however, unless the error occurred on the second retry. 


2. If an IBM 2701 terminal control unit is on the line, a read skip is 
issued and return is to the Read Skip subroutine (see Read Skip 
Subroutine). 


3. If a World Trade Telegraph Adapter is on the line, there is a 
contention situation. A break command is issued, and on completion 
of this command the write command is retried. 


When a unit check occurs, a SENSE command is issued to obtain the 
sense bits. Upon return, these bits are tested to determine which of 
the following subroutines to enter. 


Data Check Subroutine: Generally, the channel program is retried two 
times. If it fails three times, it is treated as a permanent error: An 
error message is sent, and the line is handled as if it had returned a 
negative response to polling. 


If there was a text transfer, it is treated as a permanent error, but 
no error message is sent unless other errors have occurred on the same 
channel program. 


If a Worid Trade Telegraph Adapter is on the line, two conditions can 
occur: 


1. If the failing CCW is a write, there is a contention situation. A 
break command is issued, and on completion of this command the write 
command is retried. 


2. If the failing CCW is a break, the command is retried 15 times, 
after which it is treated as a permanent error. 


If the failing CCW is a write on a line with any but a Teletype I 
adapter, the “should not occur" flag is set in the error halfword, and 
it is treated as a permanent error. 


If a permanent error occurs when an IBM 2701 terminal control unit is 
on the line, a Diagnostic Write/Read is performed. If the Diagnostic 
Write/Read does not complete successfully, bit 13 is set in the error 
halfword. 
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A data check causes the threshold line error counter for data checks 
to be incremented. The counter is incremented for each nontext failure 
(except “should not occur™ errors), including both retries. 


Timeout Subroutine: Generally, the channel program is retried two 
times. If it fails three times, it is treated as a permanent error: An 
error message is sent and the line is handled as if it had returned a 
negative response to polling. 


If there was a text transfer, it is treated as a permanent error, but 
no error message is sent unless this is a return from a third retry. 


For a read response to polling on a TWX terminal, it is treated as a 
permanent error, but no error message is sent. 


For a read response to polling on any other switched terminal: 
1. If receiving, retry is started with the third CCW. 


2. If sending, the first CCW is set to a disable and retry is started 
on the first CCW. If the failing CCW is a prepare, retry is started 
with the prepare CCW. For all other cases involving retry, retry is 
Started on the first CCW. 


A timeout causes the threshold line error counter for timeouts to be 
incremented. The counter is incremented for each failure, including all 
retries. 


Intervention Required Subroutine: Generally, the channel program is 
retried two times. If it fails three times, it is treated aS a 


permanent error: An error message is sent, and the line is handled as 
if it had returned a negative response to polling. 


If there was a text transfer, the timeout bit, bit 9, is set in the 
error halfword and it is treated as a permanent error, but no message is 
sent unless this is a return froma third retry. If this occurs ona 
Switched line, a disable is issued to break the connection. 


An intervention required error causes the threshold line error 
counter for intervention required errors to be incremented. The counter 
is incremented for each failure, including all retries. 


Lost Data Subroutine: Generally, the channel program is retried two 
times. If it fails three times, it is treated as a permanent error: An 
error message is sent, and the line is handled as if it had returned a 
negative response to polling. 


If the failing CCW is not a text transfer, the channel program is 
retried, starting at the first CCW for a nonswitched line and starting 
at the third CCW tor a switched line. 


If the failing CCW is a text transfer and the residual count is not 
equal to 0, it is treated aS a permanent error. 


If the failing CCW is a text transfer and the residual count is equal 


to 0, a read skip command is executed, and return is to the Read Skip 
subroutine. 
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Bus Out and Overrun Subroutine: Generally, the channel program is 
retried two times. If it fails three times, it is treated as a 
permanent error: An error message is sent, and the line is handled as 
if it had returned a negative response to polling. 


If a bus out check has occurred on a write CCW, the subroutine tests 
if: 


1. The next CCW is a read, or 
2. A type III adapter is on the line. 


If either is the case, a read skip is executed. Subsequent actions 
taken are the same as those taken following execution of a read skip in 
the Lost Data Subroutine. 


If a pus out check has occurred on a write CCW and either a type I or 
type II adapter is on the line, it is considered a permanent error but 
no message is sent. 


If a bus out check has occurred on a CCW that is not text transfer, 
the channel program is retried. For a TWX terminal, retry must start 
with the first CCW. For any other switched terminal, retry starts with 
the third CCW, bypassing the disable-dial CCWs. 


If a bus out check has occurred on a dial CCW, retry must begin with 
the first CCW. 


For an overrun check on a text transfer CCW, the retry counter in the 
error halfword (bits 14 and 15) is updated and retry is performed. 


For an overrun check on a CCW that is not text transfer, the channel \ 
program is retried. For a TWX terminal, retry must start with the first 
CCW. For any other switched terminal, retry starts with the third cCcw, 
bypassing the disable-dial CCWs. 


Command Reject and Equipment Check Subroutine: If the error isa 


command reject, the channel program is retried two times. If it fails 
three times, it is treated as a permanent error: An error message is 
sent, and the line is handled as if it had returned a negative response 
to polling. 


If the error is an equipment check, the “control unit failure" bit, 
bit 13, is set in the error halfword. For a switched line, the line is 
disabled. The condition is considered a permanent error. 


Read Skip Subroutine: This subroutine is entered on return from issuing 
a read skip in one of the other error subroutines. 


The status bytes from the read skip are tested for any errors, and 
the sense bytes are tested for command reject, bus out check, equipment 
check, overrun or residual count equal to 0. If any of these conditions 
has occurred, the “should not occur" bit, bit 7, is set in the error 
halfword, and it is treated as a permanent error. Otherwise, the sense 
byte of the read skip is saved and the original sense byte and CSW are 
restored. 


If the original error was on a switched line, a test is made to 
determine if a timeout or intervention required error occurred on the 
read skip. If yes, the line is disabled and it is treated as a 
permanent error. 
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If no, a test is made to determine if the original error was on a 
text transfer. If yes, it is treated as a permanent error but no 
message is sent. If no, retry is performed. 


If the original error was on a nonswitched line, a test is made to 
determine if it was the third error. If yes, it is treated as a 
permanent error. 


If no, a test is made to determine if a timeout or intervention 
required error occurred on the read skip. If yes, an indicator is set 
for the End of Block and Line Correction routine to perform reselection. 
If no, the indicator is not set. Both cases are treated as permanent 
errors but no message is sent. 


DECISION TABLES FOR ERROR RECOVERY PROCEDURES 


Flowcharts are not provided for error recovery procedures within the 
Normal Line End Appendage and ERP module (IJLQEP). The following 
decision tables can be used to determine what action is taken for the 
various errors that may occur. 


ao Table 1. Initial Selection Errors 
a a a IR co 
| Conditions | Actions | 
|---------------------- }--------- { 
| | | | 
| Attention | B | 
| | | 
| Control Unit End | B | 
| | | 
| Status Modifier | B | 
| | | 
| Unit Check 1 | 
| Bus Out Check | C | 
| Command Reject | Cc | 
| | | 
| Any other Abnormal | | 
| Status or Sense | B | 
Be ee i agen eg Serene J 
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Table 2. Errors After Initial Selection 


SO Mie ee er ep gee pe eee en ee ee Te 
{Priority | Status Conditions | Action | 
a es rT 
| 1 | Channel Data Check | D | 
| | | 
| 2 | Busy | D | 
| | | | 
| 2 | Attention | D | 
| | | | 
| 2 {| Control Unit End | D | 
| | | 
| 2 | Status Modifier | D | 
| | | | 
| 3 | Unit Check {See Table 3 | 
| | | | 
| 4 | Chaining Check { D | 
| | | | 
| 4 | Program Check | D | 
| | | | 
| 4 | Protection Check | D | 
| | | | 
| 5 |} Unit Exception jSee Table 4 | 
| | | | 
| 6 | Incorrect Length | D | 
a err re oe foe eae ee ee es OE eee eee eee ee ae le a a J 
Table 3. Sense Byte Analysis 
a ee a a ge ae grt eg ee eee ee ee ae ee 1 
{Priority | Sense Bit | Action | 
}---------- {——~+-~----~---- +--+ ~~ {------—------- 4 
| | . | 
| 1 | Equipment Check | D | 
| | | | 
| 2 | Lost Data |See Table 5 | 
| | | 
| 3 | Time Out |See Table 6 | 
| | | | 
| 4 | Intervention Required |See Table 7 | 
| | | | 
[ 5 | Bus Out Check |See Table 8 | 
| | { | 
| 6 {| Data Check jSee Table 9 | 
| | | | 
| 7 {| Overrun {See Table 10 | 
| | | | 
| 8 | Command Reject | Cc | 
Late soe = eS a ge ate Pe ete Se eae J 
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ae ac aa ype pee ee ea ee ee ee 
| Command | Device Type 
}~-------- 4--------------------------------- 
| | 
| WRITE | 83B3,115A 
| 
|WRITE | World Trade telegraph terminal 
| | 
| WRITE {| All Others 
| | 
{ALL OTHERS| All 
eee ee es A a 
Table 5. Lost Data 
Pere eats PE po - - + + 
| Command | Type 
}--------- 4-----~---------~----------------- 
| | 
| DIAL J -+ 
| | 
| READ | TWX ID Response 
| 
| READ | TEXT 
| | 
| READ | All Others 
[ 
[ALL OTHERS| All 
erie ee Ff poets eens meg nr one eR een me A NCPR A OE a ener 
Table 6. Time Out 
ee ee ere Se eee eee eee 
| Command | Type 
[---------- +--------------------------------- 
| | 
| DIAL | -- 
| | 
| DISABLE {| -- 
| 
| PREPARE {| -- 
| | 
| READ {TEXT 
| | 
| READ | TEXT Response 
| | | 
| READ | TWX ID Response 
| 
| READ | All Others 
| | 
|ALL OTHERS| All 
Ee rege oe ea ee a ecg nee eee el ar ON at SC ey Se 
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Table 7. Intervention Required 


peice ainsi aoa Me es So ees a ge Cranes ere Toe ee en 
| Command | Type | Action | 
[---------- }-~------------------------------- }-------------- { 
| | | | 
| DIAL | ‘== | G | 
| | | | 
| PREPARE {| -- | G | 
| | | { 
| WRITE | -- | D | 
| | | 
| READ {| Prior to Text | I | 
| | | | 
| READ | Text or After | J | 
| | | 
|ALL OTHERS| All | D | 
Lis ee i wie esas I a So ci a i i a Sa a et ec a ees ala em aa Ai erin ie aoe ee ae J 
Table 8. - Bus Out Check 
ma cc La ree ea ee ee ee 1 
| Command | Type | Action | 
|---------- $-----~------- Wa === --—-------~--—- }-------------- | 
| | | | 
| DIAL Le | G- | 
| | | | 
| WRITE | TEXT (IBM Adapter Types 1, 2, 3)| F | 
| | , | | 
| WRITE | TEXT - All Others | J | 
| | | | 
| WRITE ] Prior to Text | I | 
| | | | 
| WRITE | After Text | C | 
| | | 
{ALL OTHERS] All | D | 
ae ae ea SD nD Sat a tk SO ee bare ae ae ee J 
Table 9. Data Check 
ane aera Me ae Sa ye a Fe eg eS ee 
| Command | ‘Type | Action | 
|---------- }--------------------------------- $-------------- 4 
| | | | 
|WRITE | All except World Trade | | 
| | telegraph terminals | K { 
| | | 
| WRITE | World Trade telegraph terminal | N | 
| | | | 
| BREAK {| World Trade telegraph terminal | O | 
| | | | 
| READ | TWX ID Response | G | 
| | | | 
| READ | TEXT | LE t 
| | | | 
| READ | Response to Text | L | 
| | | | 
| READ | All Others | I | 
| | | | | 
{|ALL OTHERS| All | D { 
bo ete aa Ne A ee a aa Be Bone ae ees J 
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Table 10. Overrun 


ee ey eer eg ee Se eg ae a ee oe ee ee ee ed ee ee 
| Command | Type | Action | 
}---------- }--------------------—------------ {-------------- 4 
| | | | 
| READ | TWX ID kesponse | G | 
| | | | 
| READ {| Prior to Text | i | 
| | | | 
| READ | Text or After | L | 

| | | 
|ALL OTHERS| All | D | 
Pia ets ah Fe eee seer oan eee J 


ACTIONS 


A An intervention required message iS provided indicating that the 
device is unavailable; for example, control unit has power off. 


B The failing CCW is retried. On the third occurrence of this 
condition an operator message iS provided indicating a “Should not 
occur™ error. 


Cc The failing CCW is retried. On the third occurrence of this 
condition an operator message is provided. 


: ae D An operator message is provided. If the error occurred on a switched 
we oe line, a disable CCW is executed before return. 


A Break command is issued and the initial channel program is 
executed. On the third occurrence of this condition, an operator 
message is provided. 


eat 


F A Read skip command is issued and an initial channel program is 
executed. On the third occurrence of this condition, an operator 
message is provided. 


G The channel program is retried. On the third occurrence of this 
condition, the line is disabled and an operator message is provided. 


H If the residual count is not 0, go to action D. If the residual 
count is 0, a Read skip command is issued and an initial type channel 
program is executed if EOBLC has been specified. On the third 
occurrence of this condition, an operator message is provided. 


I The channel program is retried after the Dial or Enable sequence, if 
present. On the third occurrence of this condition, an operator 
message is provided. 


J An initial channel program is executed if EOBLC has been specified. 
On the third occurrence of this condition an operator message is 
provided. 


K For Teletype Type I adapters go to action I. Otherwise a Diagnostic 
Write/Read operation is performed on nonswitched lines if the control 
unit is a 2701, and an operator message is provided, 


L A repeat channel program is executed if EOBLC has been specified. On 
the third occurrence of this condition an operator message is 
provided. 
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M The error is ignored and return is made to normal processing. Ke 


N <A contention situation occurred. A break command chained to a write 
command (Carriage return plus Line Feed) is issued. 


O The break command is retried 15 times before the error is treated as 
a permanent error and a message is sent to the operator. 


AUDIO LINE APPENDAGE MODULE 


Module Name: IJLQAA 
Entry Point: This appendage is entered from the Supervisor at IJLQAA 


1. when a program-controlled interrupt (PCI) occurs during the 
execution of a 7772 channel command for the line; or 


2. when a channel-end condition occurs during an I/O operation. 


Entry from the Supervisor is into an analysis subroutine which 
determines whether the 7772 Line PCI routine or the Audio Line-End 
routine is to be executed. The ARU-Internal, ARU-Receive, and ARU-Send 
routines packaged in the Audio Line Appendage module are discussed 
first. | 


ARU-Internal Routine (Chart A1) 


This routine is entered at IJLQAA70 in problem program state through a | ‘ 
branch generated on expansion of a CHECKARU or REPEAT macro. The ALCB 

containing a user-provided address chain is posted (via an SVC 31) to 

the ARU-Send queue before return is made to the beginning of the LPS 

Control routine (at IJLQIP20). 


ARU-Receive Routine (Chart Al) 


This routine is entered at IJLQAA20 in problem program state through a 
branch generated on expansion of a POSTARU macro. The ALCB priority is 
set to X'FC", and the ALCB containing an input message is posted (via an 
Svc 31) to the corresponding MS process queue defined in the message 
processing program for the GET audio messages. When the message 
processing program is not opened, the ALCB is queued in an ALCB waiting 
chain located in the expansion of the corresponding PROCESS macro 
instruction. In any case, this routine exits to the beginning of the 
LPS Control routine (at IJLQIP20). 


ARU-Send Routine (Chart A2) 


This routine is entered on activation of the ARU-Send subtask at 
IJLQAA51+6 when an ALCB containing a user-provided address chain is 
posted (via an SVC 31) to the ARU-Send queue by the ARU-Internal or the 
Audio PUT routine. The routine is also entered when an ALCB 


representing a 7772 line requiring an initial write operation is posted a 
Via a branch to the POST subroutine) to the ARU-Send queue by the Audio 
Line End routine. S 
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Depending on the type of audio line, the routine performs the 
following functions. For a 7770 line, it updates the ALCB channel 
program before branching to the Audio Line-End routine to request a 
Start I/O operation on the line. For a 7772 line, it first checks if a 
DCV buffer pool has been provided for the line group. If not, the 
routine branches to the 7772 Disk Read routine. If yes, a DCV buffer is 
required. When no DcCV buffer is available, the 7772 ALCB is queued in 
the ALCB waiting chain of the DCV buffer queue, and the address of the 
7772 DCV Buffer subtask is placed in the subtask field of this queue (if 
this has not been formerly done by a previous ALCB in this chain). 

Then, the routine exits to the Qdispatch subroutine. When a DCV buffer 
is available, it is dequeued from the element chain of the DCV buffer 
queue and allocated to the ALCB. Then, the routine branches to the 7772 
Disk Read routine. 


IBM 7772 Line PCI Routine. (Chart A3) 


This portion of the Audio Line Appendage is entered from an analysis 
subroutine when a program controlled interrupt (PCI) has occurred during 
the execution of a read or write channel command for a 7772 line. 


When the PCI has occurred on a write command, this routine branches 
to the 7772 Disk Read routine to prepare the sending of the next DCV 
word. When the PCI has occurred on a read command, with or without a 
channel-end condition, the following action is taken. 


e No channel-end: If a DCV buffer was allocated to the 7772 ALCB, it 
is posted to the DCV buffer queue via a branch to the OPOST 
Subroutine. If not, the routine branches to the Qdispatch 
subroutine. 


e Channel-end on reception of a nonconsistent message (no input 
character, Or an EOT character only): The channel program is 
updated for a Disable command, the status of the ALCB is set to 
indicate DISABLE (LSTS=X'04'), and the routine branches to the Audio 
Line-End routine to request a Start I/O operation on the 7772 line. 


e Channel-end on reception of a consistent message: The length of the 
input message is computed, then stored in the ALCB, and the status 
of the ALCB is set to indicate READ (LSTS=X"02"). When a 7772 DCV 
buffer was allocated to the ALCB, the exit to the Qdispatch 
subroutine is changed to return to the 7772 Line PCI routine at the 
SPECIAL entry, and this DCV buffer is posted to the DCV Buffer queue 
via a branch to the POST subroutine. When no DCV buffer was 
allocated, or when the 7772 Line PCI routine is reentered at 
SPECIAL, the routine branches to the Audio Line-End routine to post 
the ALCB to the LPS queue for input processing. 


Audio Line-End Routine (Charts A4, A5) 


This portion of the Audio Line Appendage consists of two subroutines 
entered from the analysis subroutine (Chart A3) when a channel-end 
condition occurs during the execution of a channel command for an audio 
line. 


IBM 7770 Line-End Subroutine (Chart A4): Depending on which channel 
command causes the channel<end condition, the subroutine function is as 
follows: 
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e On a Disable command, the subroutine updates the channel program oe 
according to initial conditions and sets the status of the ALCB to 
indicate ENABLE (LSTS=X"01'). If the line must be stopped, exit is 
made to the Qdispatch subroutine. If not, the ALCB representing an 
enable request is posted to the LPS queue via a branch to the POST 
subroutine. 


e On a Read command when a nonconsistent message (no input character 
Or an EOT character only) is received, the subroutine updates the 
channel program to prepare the disabling of the line and sets the 
Status of the ALCB to indicate DISABLE (LSTS=X'04"). Then, the ALCB 
representing a disable request is posted to the LPS queue via a 
branch to the POST subroutine. 


e On a Read command when a consistent message is received, the 
Subroutine computes the length of the input message, stores it in 
the ALCB, and sets the status of the ALCB to indicate READ 
(LSTS=X"02'). If an overlength condition is detected, the 
overlength bit is set on in the ALCB error byte. Then, the ALCB 
representing an input message to be processed by the user's LPS 
routines is posted to the LPS queue via a branch to the POST 
Subroutine. 


IBM 7772 Line-End Subroutine (Chart A5): Depending on which channel 
command causes the channel-end condition, the subroutine function is as 
follows. (The simultanéous occurrence of a PCI condition is described 
in IBM 7772 Line PCI Routine.) 


e On an Enable command, the subroutine updates the channel program 
according to the initial write condition and sets the status of the 
ALCB to indicate WRITE AFTER DISABLE (LSTS=X'10"). Then, the ALCB 
is posted to the ARU Send queue via a branch to the POST subroutine 
to send the invitional or informational message. 


e On a Disable command, the subroutine updates the channel program 
according to initial conditions, sets the status of the ALCB to 
indicate DISABLE (LSTS=X‘'04"), and, if a DCV buffer was allocated to 
the ALCB, returns this buffer to the DCV buffer queue. Then, the 
ALCB representing an erable request is posted to the LPS queue via a 
branch to the POST subroutine. When the subroutine detects that the 
line must be stopped after an Enable command, the disabling of the 
line is prepared. If this is detected after a Disable command, the 
enabling of the line is not requested. 


e On a Read command, the subroutine computes the length of the input 
message, stores it in the ALCB, sets the status of the ALCB to 
indicate READ (LSTS=X‘'02'), and, if an overlength condition is 
detected, sets on the overlength bit in the ALCB error byte. Then, 
the ALCB representing an input message to be processed by the user's 
LPS routines is posted to the LPS queue via a branch to the POST 
subroutine. When the input message is nonconsistent, the disabling 
of the line is prepared and the ALCB posted to the LPS queue 
represents a disable request. 


Audio Error Recovery Procedures 


The audio error recovery procedures are provided to perform tests on the 
status and sense bits to determine if a transmission error occurred on 
the operation. If so, the routine attempts to recover from the error. 


Generally, if there has been no data transfer, the channel program is 
retried. If there is an error after three attempts, the error is . 
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considered permanent. A condition that should not happen is considered 
a permanent error, and the CSW is saved in the LACF field of the ALCB. 
A disable CCW is prepared and exit is made to the supervisor to execute 
the disable. 


For all permanent errors, a message is written to the operator on the 
system console. The routine executes a branch-and-link to the Message 
Writer subtask (IJLOQMW), passing parameters in standard registers. The 
Message Writer subtask builds an information block from the information 
in the ALCB, and inserts a dummy ECB at the top of the Ready Queue, then 
returns to the Audio Line Appendage routine. The LPS Control routine 
recognizes the dummy ECB, and either: 


1. Issues a FETCH (SVC 2) to call the Audio Message Writer routine 
(IJLQWA) into the logical transient area, passing the address of 
the information block in register 0, or 


2. If the Message Writer is presently writing a message, the message 
is stacked and the availability of the Message Writer will be 
tested each time the Implementation module regains control. 


For each transmission, the threshold line error counters are updated, 
and if one of them reaches its threshold value, these counters are added 
to the cumulative counters, the threshold counters are reset, and an 
operator message is provided. 


For the errors occurring on read commands (channel data check or 
overrun) the “error on read" bit (X*20") is set in the line error byte. 


For all channel status errors except unit exception (program check, 
protection check, chaining check, or channel data check) no retry is 
performed and an error message is immediatly sent. 


A unit exception detected on a read or write command is not an error, 
but indicates the caller is not expecting the end of the transaction. 


When a unit check occurs, a SENSE command is issued to obtain the 


sense bits. Upon return, these bits are tested to determine which 
action is to be performed. 


DECISION TABLES FOR AUDIO ERROR RECOVERY PROCEDURES 


Charts are not provided for error recovery procedures within the Audio 
Line Appendage module (IJLQAA). The following decision tables can be 
used to determine what action is taken for the various errors that may 
occur. 


Table 11. Initial Selection Errors 


r ae : Pima cena. 
| Conditions j] Action | 

~-=--~---------------------------- +------ { 
{Unit Check | | 
| Bus Out Check | A | 
| Command Reject ; A | 
[ | | 
{Any other Abnormal Status or Sense| B | 
a a p epee eye J 
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Table 12. Errors After Initial Selection 


Sie ee ee aaa | 
lPriority|States Conditions | Action | 
}-------- +----------------------—---— }~----—-------- 
| 1 {Channel Data Check }See Table 3 | 
| 
| 2 {Unit Check ]See Table 4 | 
| | | | | 
| 3 | Protection Check Cc | 
| | 
| 3 {Program Check | Cc | 
| | | | | 
| 3 |Chaining Check | 6 | 
| | | | 
| 4 [Incorrect Length | C | 
| | | 
| 5 ey other Abnormal Status | Cc | 
PS Is Sh et ae Ba ta ee J 
Table 13. Channel Data Check 
Re ae et ee a te ee ee ee Ye ns eee a 
i conmana ]control Unit Type | Action | 
~-------}---~------------------—------ $--------------4 
| READ 17770, 7772 | D | 

| | | 
| WRITE {7770 | E | 

| | | 
ate Nae | F | 
as ON NE ah ee ae ote Sette 
Table 14. Sense Byte Analysis 

pa eee Me eg a eae ee Pe ee er eA 
| Priority|Sense Conditions | Action ; 
}----—— fanaa nn {~-~--—------—- { 
| 1 [Equipment Check | Cc | 
| | | 
| 2 {Bus Out Check (not alone) | | 
| | WRITE (7770) | E | 
| | WRITE (7772) | F | 
| | READ | Cc { 
| | | 
| 3 {Data Check (not alone) | [ 
{ | WRITE (7770) | E | 
| | OTHERS | Cc 
| | | | 
| 4 | OVerrun | ] 
| | WRITE (7770) E | 
| | WRITE (7772) C | 
| | READ | D | 
| | | 
| 5 {All other Sense Conditions | C | 
De met 5 ae fear rite AP rede vk EC afd on Yn Poa nNmE gee Ep capes ae ee J 

ACTIONS 


A. The failing CCW is retried. On the third occurrence of this 
condition an operator message is provided and a disable CCW is 
executed before return. 
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B. The failing CCW is retried. On the third occurrence of this 
condition an operator message is provided indicating a “should not 
occur™ error and a disable CCW is executed before return. 


C. An operator message is provided and a disable CCW is executed before 
return. 


D. An operator message is provided and return is made to normal 
processing. 


E. An operator message is provided. A noise message is sent on the 
line before restarting the channel program on the command chained to 
the failing write command. 


F. An operator message is provided. The channel program is restarted 
on the command chained to the failing write command. 


WITA LINE APPENDAGE MODULE 


Module Name: IJLQOTA (Charts Y1, Y2, and Y3) 
Entry points: This appendage is entered from the Supervisor 


1. when a prograr-controlled interrupt (PCI) occurs during the 
execution of a QTAM channel command for the line; or 


2. on channel-end during I/O operations. 


Furthermore, this appendage can be re-entered from the QTAM Line 
Appendage routine IJLQLA. re 


The WITA Line Appendage is composed of the following two routines: 
e The WITTA Line-PCI routine 


e The WTTA Line-End routine 


WTTA LINE-PCI ROUTINE 


The WITA Line-PCI routine is entered when a program-controlled 
interrupt (PCI) occurs during execution of a QOTAM channel command for 
the line. 


If the interrupted channel command is a Write CCW or a Read CCW with 
a residual count in the CSW different from the initial count, control is 
returned to the QTAM Line Appendage IJLQLA. 


If the interrupted channel command is a Read CCW with equal initial 
and residual counts, the action taken depends on the type of the Read 
CCW, as follows: 


1. If the interrupted channel command is the first Read CCW, the PCI is 
ignored and control is returned to IJLQLA. 


2. If the interrupted channel command is a Read CCW ina BRB, the 


Line-PCI routine tests the last character contained in the last 
filled buffer, as follows: 
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a. If this character is EOM, EOT, or WRU, the residual count of the 
CSW is set to zero and the address of the CCW corresponding to 
the last filled buffer is inserted into the CSW. 

b. If this character is other than EOM, EOT, or WRU, control is 
returned to the QTAM Line Appendage IJLOLA. 


WITA LINE-END ROUTINE 


The WITA Line-End routine is entered when an I/O operation ends with 
a channel-end condition, or is re-entered from the QTAM Line Appendage 
IJLQLA. Moreover, if an I/O operation ends with channel-end and 
unit-check conditions, the result of the Sense operation performed by 
IJLQOLA is analyzed to check whether an abnormal condition occurred and, 
if so, control is passed to the ERP routines. | 


The operations executed by the WITA Line-End routine depend on 
whether this routine is entered on completion of a Halt I/O operation, 
of a Read channel program, of a Write channel program, of an exchange of 
identification sequences or of a Break channel program, as follows: 


1. On completion of a Halt I/O operation: If data is being received at 
the same time as the Halt I/O operation is executed, the interrupted 
Read Initial channel program is restarted. If no data is being 
received, a Write channel program is started to send an LTRS 
Character followed by n Mark characters (where "n" is the number 
specified in the DTFQT macro instruction). On completion of this 
Write channel program: , | 


a. If the cormand has correctly ended, the buffer prepared for 
input is posted to the Interim LPS Queue and the cleanup flag is 
set on in the LCB. 


b. If the command has not correctly ended, the Read channel program | 


1s restarted. 


2. On completion of a Read channel program: The last character 
received in the corresponding buffer is analyzed: 


a. If this character is EOT, the EOT flag is set on and the buffer 
is posted to the Interim LPS routine. 

b. If this character is EOM, the buffer is posted to the Interim 
LPS routine. 

c. If this character is WRU, the action taken depends on whether or 
not the buffer is the first. If the WRU character is in the 
first buffer, the Read CCW is updated to read the rest of this 
buffer, and the first part (identification sequence exchange) of 
the Read channel program is started. If the WRU character is in 
another buffer, the WRU flag is set on in the LCB and the buffer 
is posted to the Interim LPS routine. 


3. On completion of a Write channel program: The operations to be 
executed depend on how the I/O operation has ended. 


a. If the I/O operation has ended with a normal-end condition, the 
buffer is posted to the LPS queue, provided no exchange of 
identification sequences is requested at the end of the output 
message. If this exchange is requested, the first part 
(identification sequence exchange) of the Write channel program 
is started. 

b. If the I/O operation has ended with an abnormzl-end condition 
(contention), a Write Break channel program is started if the 
interrupted CCW is not a Write Text CCW. If the interrupted CCW 
is a Write Text CCW, the transmission error bit is set on and 
the buffer is posted to the LPS Queue. 
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4. On completion of an exchange of identification sequences: If the 


terminal has sent its identification Sequence (WRU=YES specified in 
DIFOT), a Write Break is started to inhibit the LTRS character, 
which is still sent after the terminal identification. On 
completion of the Break CCW, the result of the exchange is analyzed 
to determine whether or not the exchange has been successfully 
performed, and to take the appropriate action as follows: 


a. If the exchange was unsuccessful, this condition is set in the 
line error halfword, and the buffer is posted to the Interim LPS 
queue (for receiving operations) or to the LPS gueue (for 
sending operations). 

b. If the exchange was successful, the action taken depends on when 
the exchange was performed: 


At the beginning of an output message: The write channel 


program is restarted. 


At the end of an output message: The last buffer is posted to 
the LPS queue. 


When receiving an input message: If EOM=WRU, the last buffer is 
posted to the Interim LPS queue. If EOM is different from WRU, 


the read channel program is restarted to read the rest of the 
input message. 


5. On completion of a Break channel program: If the command has 
correctly ended, the interrupted Write CCW is restarted. If the 


command has not correctly ended, the Break channel program is 
restarted (there are only 15 retries). If the fifteenth retry has 
not correctly ended, the transmission error bit is set on and the 
buffer is posted to the LPS Queue if the line is sending, or to the 
Interim LPS Queue if the line is receiving (before posting, the 
buffer size is updated). 


IBM 2260 LOCAL APPENDAGES 


Module Name: JIJLOLO (Charts LO, LP, and LQ) 
Entry: This appendage is entered from the Supervisor when: 


1. A program-controlled interrupt (PCI) occurs during execution of a 
QOTAM command for the IBM 2260-2848 Local line group; 


2. An I/O interrupt occurs ending execution of such a command; or 


3. An I/O interrupt occurs with the Attention bit set in the CSW 
Status, caused by the ENTER key being depressed at an IBM 2260 Local 
terminal. This interrupt is processed only if a command control 
block (CCB) for that IBM 2260 is in the DOS channel queue. 


The status bits of the CSW are analyzed for normal or error conditions 
and entry is made to the proper subroutine. 


The module is composed of two subroutines, in addition to preliminary 
analysis. These subroutines are the Attention subroutine and the 
Channel End subroutine. Error recovery procedures are included as a 
logical part of the Channel End subroutine. These subroutines are 
discussed seperately in the following paragraphs. 


Whenever exit is made to a supervisory routine, the CSW status bits 
are set to indicate whether or not the CCB for the terminal is to 
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remainon the channel queue. If sending or receiving is to be. 
permanently discontinued for the terminal, such as during a system 
close-down, the CCB is removed from the channel queue. 


When entered because of a PCI or program check, control is passed to 
IJLQLC. PCI's can occur only on send operations. For receive 
operations, all buffers needed to read a message are obtained in the 
BRB-Ring routine prior to execution of the channel program. 


Attention Subroutine 


This subroutine is entered when an attention interrupt has occurred, 
indicating that a message has been entered at a terminal and is ready 
for processing. If this Read request occurs when a system close-down is 
in progress, or when the terminal is set for output only, it is ignored 
and return is made to the Supervisor to remove the CCB from the channel 
queue. In the case of a temporary stoppage of the terminal, return is 
made to the Supervisor, but the CCB remains on the channel queue. 


If the Read request can be accepted, a test is made to determine if 
the LCB is available. If it is, it is posted to itself and linked to 
the top of the Ready Queue. This causeS receiving to be initiated the 
next time Qdispatch gains control. Exit is then made to the 
Priority-Search subroutine in the QTAM nucleus to post the CCB for the 
terminal to the Attention queue for the line group. 


Channel End Subroutine 


Under normal ending conditions of a receive operation, the prefix of 
each buffer containing data is initialized and all buffers are linked to 
the head of the Ready Queue. Exit is then made to the Qdispatch 
subroutine, which routes the buffers to the user's LPS. 


For send operations, a test is made to determine if an Attention 
interrupt has been posted for the terminal to which the message was just 
sent. If so, the CCK is removed from the Attention queue, because the 
message to be read when the Attention interrupt was serviced has been 
overlaid by the message just written to the terminal. The last buffer 
of a message sent is routed to the Send LPS so that the user may perform 
error checking. 


In a receive operation, if the residual count is equal to the initial 
count and the interrupt occurs on the first CCW in the channel progran, 
the terminal operator has depressed the ENTER key without having keyed 
in the START symbol. The ‘zero length message bit’ (bit 4) in the error 
halfword is set and the first buffer is routed to the LPS. If an 
incorrect length indication is received with the residual count equal to 
zero, the terminal operator has entered a message too long to fit into 
the buffers provided. The "insufficient buffers" bit (bit 11) in the 
error halfword is set and the buffers filled are routed to the LPS. 


Error recovery procedures are entered if a transmission error is 
indicated in the status or sense bits. Appropriate error bits are set 
in the error halfword and a message iS provided either to the system 
console through the Message Writer subtask or to an operator control 
terminal if Operator Awareness is specified in the Message Control 
Program. 
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After completion of the error recovery procedures, the buffers are 
returned and exit is made to the LPS Control Routine as though normal 
end had occurred. Specific actions taken for various errors are shown 
in Takles 15 and 16. 


Table 15. Initial Selection Errors Table 16. Unit Check in Status 
eal erage Do yee ove a Re eo eT oo a ee a ee en ga ee aia eaecraaaga 
|Priority|Status Condition {Action | |]Priority|Sense Byte Condition }Action | 
}-~------ }------------------------ +------- {  f-------- }------------------------ +------- { 
| | | | | — | | 
| 1 jChannel Data Check { 1 | | 5 {Equipment Check-Read } 5 | 
| | | | | | | 
| 2 {Unit Exception } 2 | | | -All | | 
| | | | | | | 
| 2 {Chaining Check | 2 | | | Others i 2 | 
| | | | | | | 
| 7 |Unit Check with Bus Out | 4 | i 6 | Intervention Required | | 
| | | | | | | | 
| 9 {Program Check | 1 | [ ] -Printer | 1 | 
| | | | | | | 
| 10 | Protection Check {| 1 | | i -Others | 2 | 
ieee meen en oe a ea ad ese pene nn 4 | | | | 
| 7 ]Bus Out-Write | 3 | 
| | | | 
| 7 {Bus Out-Read f 2 | 
| | | | 
| 8 }Command Reject | 1 | 
| | | | 
| 4 |All other sense bits | 4 | 
ieee ener re A SE ene teste Nien Pe eaten ea ee RN peraniee Be ee J 
ACTIONS 


1. An operator message is provided. 


2. An operator message indicating a ‘should not occur” error is 
provided. 


3. Cn the second occurrence, an operator message iS provided. Retry 
cf the channel program is initiated by EOBLC. 


4. The channel program is retried. On the second occurrence an 
operator message is provided. 


5. An ERASE CCW is executed and an operator message is provided. 


MESSAGE WRITER INITIATOR ROUTINE 


Module Name: IJLCMW (Chart MW) 
Entry Points: The Message Writer Initiator routine may be entered: 


1. From the Line Appendage module when an error message is to be 
written on the system log. Entry is at IJLQOMW. Line Appendage 
passes the address of the kuffer in register 2, the address of the 
DIF table for the line in register 3, and the address of the LCB 
for the line in register 4. 
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2. At a log appendage within the routine that is entered upon an 
interrupt from the system log. Entry is at LOGAP. 


3. From the 7772 Disk or Audio Line Appendage module when the sending 
of an error message is requested by the audio devices. Note that 
in this case, the Audio ERP Message Writer will be loaded via a 
FETCH in the logical transient area. 


Function: Builds an information block containing all data needed to 
write the error message and places an ECB on the Ready Queue to cause 
the transient Message Writer routine to be called via a FETCH to write 
the message. 


Upon entry from Line Appendage, the routine tests to determine if any 
one of six information blocks provided is available for use. If not, 
the routine places the buffer on a waiting queue and returns to 
QOdispatch. If an information block is available, the routine moves all 
data needed to write the error message from the LCB into the information 
block. 


The routine tests to determine if a system log I/O operation is 
taking place. If it is, the routine returns to Line Appendage. 
Otherwise, the routine inserts a special ECB on the Ready Queue, and 
then returns to Line Appendage. 


The LPS Control routine recognizes the ECB, and calls Phase 1 of the 
OTAM Message Writer routine into the logical transient area via a FETCH, 
passing to it the address of the information block. 


Upon entry at the log appendage (LOGAP), the routine examines the 
information blocks to determine if another message is to be sent. 


If not, the routine branches to Qdispatch. Otherwise, the special 
ECB is again placed on the Ready Queue before exit is made to Qdispatch. 


External Routines Used: None. 
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Chart Al. ARU Internal and ARU Receive Routines 


ARU-I NTERNAL ARU-RECEIVE 
ROUTINE ROUTINE 
eH AD Ht a a a eK RR AF eK KK ok 
* * * * 
*CHECK ARU/ REPEAT * * POSTARU * 
Re Re hee ake ae ok oe a ake he ok oe MK Re ea eo a ok Ke ok 
IJLQAATO. X IJLQAA20— X 
WK ae ae Me a BD A He a a ah a ok a ae oe ae He MH AK BF eo he ie a ok a 
* * * * 
* GET ARU-SEND * x SET ALCB * 
* QUEUE ADDRESS * * PRIORITY TO * 
* * * X"FC? * 
* * * * 
Re Re ah 2 ea ae ae He eae ae 3G a ae ae of HE Me Re ee ae He ee ae he a he aie fe 2c ae 
x e 
HRC DK RR HK Ke He He KA AR Fo ee ok KK HK HK 
Hk RK OP OS TKK * * 
*POST ALCB TO * * GET PROCESS * 
*  ARU-SEND * * PROGRAM ENTRY * 
* QUEUE + FROM OTF TABLE # 
ee he ate ae He he 2 he Me Re fe 2 2 ae ae ae a he ee ae ae eo 
x x 
FORCED 234 fo tok ak okotok fei took D 3a tk tokok ike 
* * * * 
*GET LPS CONTROL# * GET DASD x 
*ROUTINE ADDRESS* * PROCESS QUEUE * 
x x * ADDRESS * 
* & x * 
a a ; We RK eR eke he a ok oe aK OK We Re He he aR a He a he a i aK 
a : : 
ee : A 
Z x 
: oe RECENQ 
x E3 ee We he ae ak He EL oe Re ake ae oe a ae oh 2 
RKRRE DH HK KH HK KK e * MSG ‘6 * * 
x EXIT TO x -*PROCESSING *. NO *GET ADDRESS OF * 
* IJLQIP20 x &. =» PROGRAM) pKa aeeeee-X*® THE ALCB * 
* x *. OPENED .* * WAITING CHAIN * 
He eh a eo a oh oe 2 on * *& * 
x, 6 ¥ he ae Re he he Re a he aR a ae He a 2 a he 2h 
*YES i 
. as sooo te esi aed tah INS od nee 
: x % 
x RECTEST  .%. 
eto F 32 fo a toiok totck F4 feito F 5 iatok tot took 
* * s - * * 
*GET MS-PROCESS * .* DUMMY —*. NO * GET NEXT * 
* QUEUE ADDRESS * *2 ELEMENT IN .¥%eceeeeesX*® ELEMENT IN * 
* * *. CHAIN .* * CHAIN * 
* * *, o* * * 
RM Re he he he a he oe a oe KK *. o * He BM i HK eK ho KK KK 
: *YES 
x RECENQUE xX 
4k G 3K RK Trt riyerrr iors tf: 
4 AK QP OS TREK * QUEUE ALCB IN * 
*POST ALCB TO * * CHAIN BEFORE * 
* MS-PROCESS  * * " THE DUMMY * 
* QUEUE * * ELEMENT * 
MK RK Ke oe We He Re we Re ae He a Ke ae Re he fe ae a 3K 3c 
SNe eS ade Di et Stas as 
BYA1 x 
He HR He Re HY FH ee oe oo KK 
* x 


*GET LPS CONTROL* 
*ROUTINE ADORESS® 


* * 
BRE AR Ae A I A a a 


meee eee 


We ee FB a oo a KK 
* EXIT TO * 
*  I1JLQIP20 : 


Sa a aka teak tek 
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Chart A2. ARU 


Send Routine 


ARUSND72 
rere TIVIT IT TT TiS 
fete A ek tok tok # * 
* ARU- SEND * *SET INITIAL AND*® 
* SUBTASK ENTRY * eee X*FIRST WORD FLAG* 
* * i * ON * 
So ok tok tok A * * 
7 : Perevtrr crt rere ttt 
: ‘ x 
ARUSEND X ° o *, 
KKB) ERKEKKRKEAE ° B2 *, 
* * > -* IIS *, 
* RESET ALCB * e e* PREVIOUS *. NO 
* ERROR BYTE * e e STATUS oXeecee 
+ " : *#. READ .* : 
* * : *, .* ; 
wrTTTTTTtTtTT ers tt nm He a ‘ 
e e *YES e 
x ; : F 
Cl’ 7. TTTT WLT TT TT TTT 
*. e * % Ld 
o* 7770 e NO . * SET PUT AND * ° 
*e CONTROL oe Xcevcce * WRITE STATUS * e 
Re UNIT * * * e 
* .* * * : 
. ok wrTTTT ttt TTT ttt : 
*YES ° ° 
Hy AE SON 
° x 
x e *, o*, 
fetetotok D etek tk teat tok & D2. *. D3. &. 
* * -* : -* IS *, 
*#LOAD WRITE CCW * .* 1S *. YES -* THERE AN -*. NO 
*ADDRESS IN CCB * #2 BUFFER POOL 2%. c0eeeeeX* AVAILABLE DCV.¥%ece. 
* * *. PROVIDED «+ *. BUFFER .* : 
wT TTTT TT tT TTT eT ts “ee ak eee : 
° *NO *YES <i 
: ox. eeeseoeoeeoeoeae eo : A 
x TAC x : x ue 
TT TTISeT TTL TTL es REA AE DRE REE 5 RRR E Fe EE : TTT Pitt Totter Tt SS 
* * * * : * * 7 * * 
* UPOATE WRITE ¥* * GET 7772 DISK * 2 # ALLOCATE DCV * = :° * QUEUE ALCB AT * 
* CCW IN ALCB # # READ ROUTINE * > «= RBUFFER TO ALCB * = oo X#TOP OF THE ALCB* 
SCHANNEL PROGRAMS : ADDRESS . e : : é ° : WAITING CHAIN : 
rT TTTT TTT TTT TTT TTT TT TT ToT TT TTT . Terre TTT TTT TTT Ts . : fk ok ee 
x : : e : z ; 
o*. a e xX e e x 
Fl *. x : KECESEQRREREKEREE OL - 4 REELS HOR EE EERE 
x *, HERE DER KEE EEE : * DEQUEUE DCV * 3 2 * * 
YES .* MASTER "*. * EXIT TO. * - (BUFFER FROM * ; GET ADDRESS OF * 
eeee%®. RCVE SWITCH .* * I JLQAD30 * cee. ELEMENT CHAIN * >: o* THE 7772 DCV * 
e x, OFF * * * * OF DCV BUFFER * ‘* e *BUFFER SUBTASK * 
: : ‘ Ao fob tok tok tok ea * QUEUE . ° - = 
: 2) tg HERE KERER EES RE ERE . : PTT TTT TTT TTT TT Tt 
e *NO e e e 
: x eeeaeeeeoesteoeesesdse Z : 
° o*, CONVERSE NOBUF o*, ° xX 
‘ Glo. HRSG 2 eR EE EEK G3. *. 2 HEEKKGSEERERS EEK 
é e* INQUIRY *. NO *CHAIN WRITE CCW* ox DUMMY *. YES e *ADDRESS IN THE * 
. - * * * *. CHAIN .* ; * OF THE OCV * 
s *. o* * * . ° * BUFFER QUEUE * 
*. Ok TTT TTT TTT CT TTT *. ot EXSRAEEEAERE EE EEE 
. *YES ° *NOQ e 
tes Otteol ae 7 : : 
x x x : 
WeTTT TTT TTT TT et: PTteTT PLETE TT TTT PT ETT TERT TTT TT tee: 
* * * * * * : 
*CHAIN WRITE CCwe * SET PUT AND * * GET NEXT * ° 
*ON OISABLE CCW * * WRITE STATUS * oe eX*® ELEMENT IN * e 
: : : : e : WAITING CHAIN : e 
IO tok a a tk TT TTT TTT Ter TTT Ts = TTT TT TTT Tet te tt i 
: ; x 4 
x xX e 0%, ° 
seeee) Leteee sees He RK De a : J3, : 
x * es o* e o 
* SET DISABLE * * GET LPS QUEUE * e NO .* OUMMY *, e 
* STATUS KeacvececX® ADDRESS * ecee*. ELEMENT IN .* ° 
. : is : *. CHAIN . ° 
wT TTTT TTT TTT ett rrTrTTT TTT tert TTT ae a 7 
° *YES ° 
- x ‘ 
x FeEKEK IORREEERSES : 
ERAK IE REEE EEE * € FEEEK GEEKS CREE < 
* EXxI To * * QUEUE ALCB IN * * ExIT To * e 
* QSVC POST * * CHAIN BEFORE ¥®..200200X* QSVCOI SP BX ccccccccccccccece 
* * * DUMMY ELEMENT * * * 
i ok ok $8 He * * KERKEREEEEE EERE 


EKEKERREREEE EERE 
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Chart A3. Analysis and IBM 7772 Line PCI Routines 





ee kee x 
* * *A3 * 
* AZ * * AS* 
* * * * 
a * 
x ° 
o*e APT72A o%. APT2C xX 
EPPESAOEELI SESS ® A3 *. A4 *, ok Oe A 5 eto Ok ek ok 
*eAuDLO LINE GET ADDRESS OF # NO..*” IS LAST *. YES: eal ves = COMPUTE INPUT * 
* AUDIO LINE * " ET ADDRE ° ° ° 
* APPENDAGE * *7772 DISK READ *Xscccesae®e COMMAND eH eaccvceeXKe CE DE oKeeccceeeX*MESSAGE LENGTH * 
* * * ROUTINE * *. READ . Py o* * * 
TORO IO OE BK %* * *, o* *. o* * * 
> Sok ROR Rok Ro ok fot bok tok x, 4* Ke an eet eT ETT Tt Tet ts tty 
. ° * * e 
3 ” $e OK . ‘ 
e o * * e oe 
° ° *A3 *.. ° 
° . * B4* ° ° 
x * oo xX . 
IJLQAA o*. ° AP72 oXe oe 
: 1 *. B4 *, B5 *. 
o* x ek ROK B 2k ok ik tok acl eal aia 3 *, * 
o* IS *. YES * EXIT TO * * XIT TO * NO «.* IS OCV *. « *LENGTH=0 OR*. YES 
*. CHANNEL e*ecccee * IJLQAD30 * * QSVCbISP ¥Xeewcceve te BUFFER o* *. MASTER RC oKecce 
« BUSY 2% S om * * *.ALLOCATED.* e SWITCH . e 
x. * i PoP SEPT SPST ee ST Perse eres st fe 8 27 * 5 o* *. OFF .* é 
Ke 2 * e *. .* *,. oo * e 
*NO . *YES *NO ° 
eo e e xX e 
x e x o *. e 
HOR HOKE [ORR to é ete OC Gk tek ok tok ak C5 *. * 
*SAVE REGISTERS * . eC Do a a ae oe a a a * * gee *. * 
SET BASE * ° * RETURN TO * *GET DCV BUFFER. * NO . He ° 
‘ REGISTER FOR * 2eeX*® SUPERVISOR * * ADDRESS FROM * oooe *, TOVERLENGTH o* e 
* QTAM SVC * * *x * ALCB * ° *. o* e 
ROUTINE * eo ek tok tek ok te * * ‘ *. yet ‘ 
SO RIOR FORE do He Re he ac he ae ae a oe ka eae oe a *. ; 
e ° ° *VES ° 
xX X ° X ° 
tO D Ok do ae set RDG oe ek ok 7 er eeeDoeenee eases ° 
SET BASE * eK (1) Fk * * é i 
* REGISTER FOR * * REENTRY FROM * * CLEAR THE OCV * 7 Ser ONE Ta acces * ° 
*IMPLEMENTATION * * SUPERVISOR * *BUFFER ADDRESS * e BIT ON IN ALCB * ° 
*ROUTINE AND FOR* * * * IN ALCB * . > ERROR BYTE * ° 
ALCB * ee he oe a a a he a a ak * : * * e 
SOR tOR ok ok 4 et a tk teak teak da ok a 5 $k FO OK OR e 
e e oe e:8 @-ecere bree oe eo 
e e od x eo 
; x SPECT AL X ° APT2E o*. ° 
7 ao SOROR IOK EE 6 Sok dk dk tok MARKEE FREES ER X E5 *, é 
oe ‘ * * * * REEKEGKHEEEEEKE o* *. B 
; od * SET BASE * *RESTORE RETURN * * EXIT To * NO .* IS LAST *. . 
te * REGISTER FOR #* * REGISTERS OF * * QSVCPOST evecee*e. CHARACTER .* ° 
Ne * OTF FROM ALCB * * SUPERVISOR * * ; ° ° EOT ° e 
ies * * * * He ote i ak a ak ie ak ae ae ok *, o* : 
$otok to tO tok tok tok ee & RO to tok do to ek . *e o* 
e ° ° *YES ° 
e xX e eo . 
e Hh eK . Z . 
x * * ° ° ° 
o*, * JG * APT2FA ° X ° 
Fl *. * * Seto aOR 4 toto kkk 6 SORE E 5 dk AO . 
o* SENSE *. Pg ela eb adv bg KK * * a * DECREMENT * Be 
o* CCW OR *. YES EXIT TO AUDIO * * STORE INPUT * x * LENGTH BY ONE * ; 
*, STATUS ace cecdke ERP PROCEDURE * *MESSAGE LENGTH ¥*X... *AND CLEAR ALCB * e 
*,. ERROR . * * IN ALCB * ° * ERROR BYTE * ° 
*, o* Tp euvansaneaves . * . 
*. .* tok Sct KR Robo 0K $k - AKA EEE EE EERE e 
*NO eo e e J 
oe J eo X e 
NOSENSE x X 7 o*, ° 
wo aKG ) eK EE HHH GAR EK . G5 *. " 
*SAVE LAST USED * * * ‘s : *. ° 
* COMMAND CODE * * * te NO .* *. ° 
*AND CSW STATUS * *SET READ STATUS* eoeeee*®. LENGTH=0 0% e 
* IN ALCB * * x *, * ‘ 
* * * *. * ‘ 
ROKR KEK EE KEK Hak RIOR ROR it ik *. o* e 
° *YES e 
° 3 * kk 5 4 
° e * * e e 
e e *A3 Koee e 
° . * H5* 7 e 
: xX ee KK < Z 
o%*, oe 
eg ROH ed dk ok a EH BEER KEE H4 *. Deel eceeakaaees ‘ 
: MOVE RESIDUAL " REGISTERS OF * YES en - * MOVE DIS E ; 
° x, ABL ° 
*COUNT INTO CCB * *SUPERVISOR AND *Xecccecee®e PCI o* *CCW ADDRESS IN *Xee- 
* * *PREPARE SPECTIAL* *. 0% * CcB * 
* * * RETURN *. o* * 
SeqROR IR OR Rk tO eae Rk ROR to a OK eK x, .* RHEE KE EE EEK EK EKK 
° ° *NO e 
e s eee é : 
e e * * ° e 
° x * S44 Keen ° 
: ** KK * * e 
xX * * ee KK ‘ ; 
o*. APPEND72 .*. * B4 * xX xX 
Jl *. J2 Ke * x MAO IGE EE EEE WHKEKK IS REEAREEAERE 
o* *, * *, #4 eK * * * SET OISABLE_ * 
o* 7770 *. NO o* *. YES * GET LPS QUEUE * *STATUS AND SET * 
*. CONTROL oF er cc cece eX. PCI o%eaee * ADDRESS ¥Xecccccece FALCB oR. FLAG * 
*, UNIT * ee e e * * * * 
° o* *, o* . x * * * 
*. o* x. xX EMER EEE EE EEE K CHEAEEKEEEEEEREEEEK 
*YES *NO he . 
° ‘ * * . 
e e * AZ * ° 
e ‘ * * i" 
- < eae ° 
Xx x 
sem RR K ato tok tak tok Ret I Dk oak tte tok dc WOK GK NOK 
: EAL TO 7770 »* * EXIT TO 7772 * * EXIT TO * 
INE END * * LINE €ND * * QSVC POST * 
: | ROUTINE * * ROUTINE * * * 
FOR ROK i a tok ke a ak Sk i bot dak dota tok dak at ak ROROCICROROR tok ak te ake geo 
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Chart AY. IBM 7770 Line End Routine 
TeTTeORET TT TT rT 
* 7770 LINE END * 
: ROUTINE * 
errr TTT Terr te OK KK $k 
: * * * * * * 
s * B2 * * B4 * * BS * 
. x x * * * * 
. HK at K ert 
x . x - X 
*. START70A 2 ¥. START 70B DISBL70._—«X READTO _oe 
Bl &. B2 Serer errrrrre tet OOK B Ga tek ktotoiok 5° **, 
* x, o* ALCB e * * * o * 4 
YES . : 2%” START -_YES * RESET START #* * LOAD DISABLE * YES .* ALCB*. 
wee%. INFORMATION .# #TREQUEST FLAG o®.eceeeeeX# REQUEST AND # *CCW ADDRESS IN *X.eseeeee%s HALT I/O 2* 
oa MODE es i ON sar *APPENDAGE FLAGS* : CCB 4 X ¥o FLAG ON 
Pe ok aes : TT TT TTT TTT eer eT rere rtr tT tt ttt tt ae "ee ok 
*NO *NO ° ° e *NQ 
x : : : : : 
o *. X EXECEXCP xX xX . x 
Cl |e FOR IOKC 23a CR a Rok tok ak FO RC Jak Rack a tokok Rod Gade todtoack F tek C5 $e a ii tok 
.* WAS &. * * * * * * * * 
e* PREVIOUS *. NO * SET ALCB * * SET ALCB EXCP * * SET DISABLE * ° * COMPUTE INPUT * 
° STATUS oXcece *APPENDAGE FLAG * oe eX% FLAG ON *XeccccceeX STATUS * ° *MESSAGE LENGTH * 
*. DISABLE . ° * ON * Ps * * * * ° x * 
*. .* : * x > ox * * * ° * * 
x. ok x JC OI RO RII aa toiaiot ir 8 eo Roi iotoi aia ait ak foo aaoitoktoaoear f errr rrr te ere tt 
*YES # kK 3 : 7 
eo aK % e eo e J s 
e * B5 x e es e e e 
e * * ° e e e = 
e e @e e e xX 
x : SPOSTIPT7T._ X : o*e 
yok ROK Da ai fete dake tateak x BO gk ok 0 3 a taki tala tetok : 05 *. 
* $e ORD 22 Fo aOR ROR Om é * * x .* *. 
*LOAD ENABLE CCW* * EXIT TO * > -& «GET LPS QUEUE * > «YES 2% : 
ADDRESS IN CCB + * QSVCDISP > # "ADDRESS Kee. ceeeee%#s LENGTH=0 2 
x * TT Trtt ttre re st. ook x 2 "i, * 
err Trrrre rT rer 8 EOE of . * 
. s e . ¥*NO 
x : : i x 
aX, WR7OINIT e ° . o*. 
El. *. ORE 2k dak doi iioiook x 7 ES “*. 
.* * x Alok E 3a takai sok ok Z *. 

Ph INITIAL *. YES * CHAIN ENABLE * ° * EXIT TO * 7 NO .* *. 
*, WRITE eXcacceveeX*® CCW ON WRITE * - x QSVCPOST * . ecee*e QVERLENGTH .* 
* .* * * : TeTrTererrrr ett : : *, .* 

*. Gk errrrr rr eT rrr TT : 2 ; x, ok 

*NO ° ‘ s a *YES 
x x : 3 ; x 
errr sere r rrr rT AOR 24 8 ROR foi : : 2h qaOK F 5 oii dia doiok 
* * * x : . : x x 
* CHAIN ENABLE * * UPDATE WRITE * : > -#SET OVERLENGTH * 
*(OR WRIZE) COW #Xecccceeed® CCW * : : >) &BIT_ON IN ALCB * 
* ONREAD CCW # * $ ; : > * ERROR BYTE” + 
e e e x 
TTT TTT TTT TT TT JO IGSI IR IOI to aint aiok Z 2 : FeO OI tok doiotok 
ON ond cere Ne : 7 Staite uaete 
e ea xX 
START7O xX - e READTOF READ70D 0%. 
SaGOG Lalas : 7 $e OK G Galetok takatokakaok G5. &. 
7 * * .* *. 
* RESET ALCB x ° ° * STORE INPUT * NO .* IS LAST 
* ERROR BYTE *% ° s *MESSAGE LENGTH *Xecccccce Xe CHARACTER .* 
* * e ° * * X *. EOT ° 
x * : 7 * x 4 *. .* 
TET TTTr Tre Terre : é Joao  f *, 4% 
x : : x = ~=READ7 x 
SO EH Lada : : WoO Geo 0S Meee suse seaeexuns 
: : * * 2 *DECREMENT INPUT 
* SET ENABLE * e ° * *x e *MESSAGE LENGTH * 
* STATUS * 7 eocoevee*SET READ STATUS* ° *ANO CLEAR ALCB * 
: ‘ . z : ° Dé ERROR BYTE 
Re GIGI I ROR go aig kaka : TTT rrer rT cet tT ae ST TTT TTT Cr TT Tere 
x : 7 x 
eX. ° bd 3. 

Jil *, . e J5 *e 
x, *. . TOR Da to HOR Fok tok ¥ : ox *. 
a MAL YO: cee xe QSVCDISP 5 : . ee 
e oe @eeeoeeee e @eeeoeo oe Xe = ox 
*. FLAG ON . % * 7 LENGTH 0 ; 

*. .* JI IOI IRI IOI Iai : *. .* 

Ke ox es x, * 

*NO 7 *YES 
3 : x 
° : $k ke 
- * * * 
se e * * 
gk wes é * aad * 
-* ALCB "*. NO f ica! 
e ie) e 
KS * 
*YES 
x 
eK I 
x * 
* BQ * 
* * 
eto 
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seo tok Ap take tok 
* 7772 LINE END * 
x* ROUTINE 


*x 
* x 
ROR OK OK OK dk RK 
x 
CHDVEND o*, CHDVROND .*. APT2G 
Bl *. B2 *. 2k 20 B 3 Ft RR ot Rok kik 
o® x, ox *e * x 
. IS ALCB *. NO e* IS ALCB *. YES *L0AD ADDRESS OF* 
x. STATUS oXcccce cee X%e STATUS eo Xe eceeee eo X* ENABLE CCW IN * 
e ENABLE .* *. DISABLE .* * CCB * 
Ke 0X e Ke * x 
xe. * * *x, . & We Re Re RR Reh ak a eae he ak a akc 
*YES e *NO ° 
X e X e 
o*. ° o *. X 
Cl bam oi C2 x, We RH HK FB Re a 2 a oe a 
o* x, Ps e * * x 
YES .-* IS ALCB *. ° * =I AST *. YES * SET ENABLE * 
eae, HALT I/O o* ° *, COMMAND o*cece * STATUS * 
e e FLAG ON * e Ke e e * * 
e x. o * e e o * e % * 
X we. 3% . *. 4 t xX ok RRO ROR ROR Rk ROR a ae a ate a 
He ea eK *NO a *NO ek ek a 
*AZ * ° ° *AZ * ° 
* H5* A . * AS* ° 
x & ° e X * & ba 
* . i He RK * e 
Xx . *A3 * ° 
a®, . H5 
OL *. F * We RR I DB eR a a ea 
o*X *, P * x 
* INITIAL *. NO ° * CLEAR ALCB * 
x, WRITE eX ececcoee % ERROR BYTE cd 
a o® x * 
x, &* % * 
Ke oe Ree Re aR ae he ae Re oe 2K eae 2 2h 
*YES ° 
° x 
x o*s 
sek tO Ek ek kk ak tok ak HHH RE DK Ro to HOR E3 xe 
* % * DECHAIN x o* x 
* SET STATUS TO * * WRITE CCW * YES .* WRITE *. 
* WRITE AFTER * * FROM ENABLE XK eecccsccorX%e INTTIAL . 
* ENABLE * * CCW * *.REQUIRED .* 
* * x * xe * KHRKK 
WR Ree he Re he oe fe ae a ae a ae ae hc ac 3 We Re Ae Re oe ea ok ok a a ak i *, 4 & * * 
Z é *NO * FE * 
e . . * * 
- - . é sek aC 
ae 
ang e e e e 
i ° so ea, 6 eb) s. 6 wielers ose aehele @-wie'ersiae ho: es 
| a o 4 x 
ed X ‘ AP72H a, APT72I o%*e 
a eM HR Re AE FY ae ae aK a ae a ae aK a ak F3 x, F4 xe, 
* * o* ° e*WAS DCV*, 
* UPDATE WRITE * ~* MASTER *. YES e* BUFFER *. YES 
% CCW * *, RCVE SWITCH os celeieee eee ASSIGNED oXcces 
* * *, OFF o* xX *. TO ALCB . ° 
* * eo e J x, e* es 
oe Re oe ate ae i a ae a a i oe ok a ok xe o * z x, 4 * xX 
. *NO Ps xNG eK KKK 
° . . ° *A3 * 
e e eo e * B4* 
: a ba! e x * 
e e e e * 
° x e e 
X o*, Py ° 
Be RR RG i a a ae a ak a ok G3 x, is x 
5 fs ‘ Hea HG GK EH 
* GET ARU-SEND * ° ALCB *,. YES 4 * EXIT TO * 
* QUEUE ADDRESS * *. HALT I/0 eX cccces * QSVCDISP * 
* * e FLAG ON . * * 
* * ® em Ke ox He ae he ae ee ae He He aK KK KK 
He he He he ke a ae ae ae ae ae ae 2 ake 2 * * x, « * 
. * 53 * *NO 
S * * 2 
° % HK i 
e e x 
° e o%*, AP7253 0%. APT2K 
xX e H3 x, H4 *, eH AK AK FY 5 ok Ko eK 
Re We ae HH] he 2 2h 2 2 ie Ke 3 *, * RESET ALCB * 
* EXIT TO * ° o* ALCB *. YES o* NEW *. YES * APPENDAGE AND * 
% QSVCPOST * . *. STOP FLAG) eX%eccceceeX*e START oXecccecaeX*® START REQUEST * 
* * . *. ON 7% *. REQUEST .* * FLAGS * 
he eRe oe a Re ae he ec ae 2 * Ke X xe * * * 
* *e 4X x. o& tok ok tk tok ok kk tk 
e *NO , *NO ° 
TELE ee ee ee ee e e 
AP72HA x xX X 
eR I KD he eo Ka He He We He eG he he oh Be he 2 he 2 he 9 Me ate eK YH oe ae He a] ae ke a 
* SAVE RETURN * * * * * 
* REGISTER OF * * SET ALCB * *RESET ALCB STOP* 
*SUPERVISOR AND * *APPENDAGE FLAG * * FLAG * 
* PREPARE * * ON * * 
** SPECIAL" ENTRY* * * * * 
Me a a fe ae Re a ae 2 ae ae a he ae ae 3 2 Be Re 2 fe a he af 2 aK he ae a a ae ae ke Me ae Hea ah ae he i 2 a he fe ok ak a aK 
e x 
7 eK oS 
e * * * *« 
X * F4 * * J3 * 
eRe Me AK KD he he ae he i 2h 2K ok x * * ~ 
x KK AA KKK 


: % 
* SET _ALCB EXCP * 
* FLAG ON * 


* * 
EM A He a a he a ae a 


X 
me 
* 

* F4 
* 
RK KK 


Kx 


HH H 
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1JLQ60 
FECEALERSRERESS 


* BREAKOFF * 
* * 


SHEREKEREEEERES 
x 
HOEEKE)EREEESERES 

GET THE * 
*ADDRESS OF THE * 
* START OF DATA * 
* FOLLOWING THE * 
* PREFIX * 
RERKEREREEEERERES 

x 
CREEL | KERR ERE 
* * 


* GET THE * 
*LENGTH OF DATA * 
: IN MESSAGE : 


SHERSHHAKERE SER EES 
x 
o*. o*, 
D1 *. D2 ¥. 
* *. e*ARE ALL*. 
e* LESS THAN *. NU «* MESSAGE *. YES 
*, 2 BYTES IN eFaccscceeX#e CHARACTERS se eeeoaeceeeeeceaeneeveeeneeeaeoaneeeenveaeeeceeaeesenea2neseeaeeoe eet 
Fo MESSAGE o# *- IDENTICAL .* * 
ae ae *, wt i 
* YES * NO ° 
* X ° 
é CEKKKE 2 EHEREEKEKE ° 
7 * * e 
° * ACCUMULATE * e 
eeevcccccccceses cX*# TO TA L ME SSAGE * e 
*LENGTH TO THIS * ° 
POINT * e 
SRERECOHEREEEERES e 
x ° 
SERKSEE PERE EHECHES . 
* G * ° 
*MAXIMUM ME SSAGE* ° 
+ LENGTH * ° 
* SPECIFIED BY : e 
* USER ° 
eaaeeeeeanewaneee s 
x e 
.*, of. x 
G2 *. G3 *, SOEEEEGGSEERSEEEES 
-* IS *, «* HAS *. . * 
o* PASSED *. NO * AXIMUM #®,. YES TURN * 
PeLENGTH EQUAL .¥eccce eee X*e LENGTH BEE reece ee sKHOFF RECEIVE BITs 
« ZERO .* @EXCEEDEN .* IN LSTA s 
‘ * ®. * ; * 
*, .# *, .* SHKERERESESESESED 
* YES * NO ° 
e x ° 
Py rere ree eT ee eee eee ee ee ee ee a ee ee er 
X 
o*. 
H2 *. 
* FRESH EREE CRED 
END OF NU * * 
*. o MESSAGE ON Ns eoeecee oX* RETURN TO USER® 
*. PREFIX .# * * 
*. * CHEHECEKEKEHERE 
*. .* 
* YES 
: 
J2 *, Seeee Js eeeete sess FIGS EEE 
*,. : * * Pa edal i -icaahaad 
OQGRAM *, YES * SSSEXCPees & EXIT * 
CHECK FROM Ng. # receees oXSINITTALIZE “tes Secs ceee XOWRITE BREAKOFF SeeeneeeekSTO LPS CONTROL ® 
BUFFER * FOR BREAKOFF * * CHARACTERS * 
e * * * * * * eecessesseceess 
mee CCTHEREEEEREEETEE CHRESEEESAE 
X 
gRRESK2eeeeeeyee | 
: RETURN TO USER’ 
Seeeseanenseees. 
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Chart CC. Copy 
kok A 2k Ri tok kok 
ROR A] dk tok took * * 
* * * GET QCB * 
* COPYC * sexe ADDRESS x 
* * ‘ x * 
Pee ee Se SS 2 2:2 2 Ff ‘* * * 
e ie ie We whe RK Beak ee Ka CK oe aK 
TJLQDOC xX e x 
ate he eek Be Re ae ah ae ate ae oe a ak Pa He HK RAK B Da Me ake Heke eK ek 
ak SAVE * ° * % 
* REGISTERS * Py * GET DTF * 
* SET * * TABLE. ADORESS * 
* BASE * . * 
* * x * * 
eR Re a ae a a ae a a ap ae a ke a i. We he ae oo he Hehe a] RK a ok 
e oe x 
x e o *, 
Faken to Ca tok dk dott ‘ C2 ae 
* x e o%* *, 
* GET ADDRESS * ° e* SWITCHED Ke 
* OF VECTOR x ‘ x, LINE 
* TABLE & a ° é 
* * e *e * 
eR he ae ae ae ae oe a a he a aK he ae hc e Gi Ren oie 
7 e *YES 
e e xX 
x e@ oe *. 
We a a DD) 2 ae a a ea ee ae < 02 *, 
* GET ADDRESS * ° o & He 
* OF * Py e U ° 
* QTAM VECTOR * . Ke SPE 
x TABLE * . e ° 
* * Ke ox 
Re Be ae ae oR ae ae fe ea fe oe ae 2 oc - *, * 
is ‘ *YES 
X e x 
we a Rea Eke a he oe oe eK “ HR KKK E DK RK RK hk ok 
x % 2 * LOCATE LCB x 
* GET-ADDRESS * . x USING RLN * 
* OF TERMINAL * . * SPECIFIED BY x 
* TABLE * e %* USER * 
td * ‘ x * 
Re oe he he a ae ee ae ah oh 2 he 2k é We Xe he HK a ae he Ke fe 3 a he a 
xX . 
aXe es 
Fl x, 3 
o* x, eo 
2 ENTRY *. YES e 
*, FOUND oe Xeccece 
xe x 
Ke 9 ¥ 
*NO 
x 
aXe 
Gl *, RK KR KG DK HK HK KKK 
<* *, * * 
o* LINE *. YES * GET ADDRESS * 
*, TABLE e @aeeeeoee#e#e? * OF LINE x 
*. SPECIFIED.* TABLE bs 
xe x * * 
*, x He RK he ee ke he oe ae fe 3 aK 
*NO ‘e 
* x 
xX a *. 
ROR BHO YD ao a 2 he ho he H2 *,. 
* RESTORE * eX x, 
* REGISTERS, Ed NO .* ENTRY x. 
* SET ERROR *Xcccccace Xo FOUND 
* CODE OF X'20* * Ke ys 
Bd * x, eo x 
A he He 3 he ee aK ke af ake 2 a *, x 
. J * 
xX 
MM HR YD a a ok hoe 
* * 
#RETURN TO USER * 
Fee ae ae Re a oR he a a ae ae ae ok 


NO 


NO 


SER * 
CIFIFD eoXccccccescccseccerX 
RUN * 


YES 


SEs es ee Rie ek ADDRESS FROM 


eoKeccccccccccccccocs 


c@eoeoeet eo ee ee eae er eovreveesoeses 


nN 
we ae a RE Bk he ae 2 Re aK oe a OK 


LOCATE LCB 
USING RLN 
FROM QCB 


We He Re ea Fee Be ak he he ae a ah a aK 


HH HH Ht 


BOK ROR H 3 i tak ke tke ake ok 
* * 
* LOCATE ACCB 


x LINE ENTRY 
Sa a tok gk kok ea kek ak 


HHH Ht 


HHH 


Line Error Counters Routine 


. 
CY) 
~< 
° 
6 


eeeeeveeceeneveennensecen ecceccccccccescceeX 


oe*eoeeeeee eevee eeseereeeseeveesveereeeeonaeenenee one. 


oeoeeoeeeteeeeeee eee eee eee neeeseoeeveeeereoeereeseeseenenetsteoeseseesese 


sab A 4 to tot otek 
* ADD THRESHOLD * 
* COUNTERS TO * 


2 eX* CUMULATIVE * 


* “COUNTERS * 
Me KK KK KKK KK 


Meee eo 8 


KH RKB 4 KK KK EK 


* MOVE 

* CUMULATIVE 
* COUNTERS TO 
: WORK AREA 
x 


Me Xe i ae ae a ae 2 he a a cake ok ak ok 


HHH 


<0 0 8 6 8 Oe HNP NO Hse eo eo eee 


$2 D4 tk a ak 
#4 QPOS THR 
* RESET * 
* THRESHOLD * 
a COUNTERS TO 


* 
ZERO * 
RAKE RE 


e 


eee es 


SCE Gato Rk kok 
* RESTGRE * 
* REGISTERS * 
* SET ERROR * 
: CODE OF X*OO! : 


Me A Re RK ee a he ok 


> ee ee ee ee ee ry 


HHH AG 4 KH KK KK 


* * 
SRETURN TO USER a 
Se gto ek tok dk kk 
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Chart CK. 


ea a A] 2k ae Xe 2c fe 2 ak 
* x 
* BEGIN * 
x * 
Ie ROR ge rk ka ea i i ok 


Checkpoint Routine 


Aa KB 2 ok kok kak tok 40k 


*DISKIO CKF4 * 
Ka ee eee * 


xOANDO 


Xocceccccnce 


KKK CD KK 
* 

* SET! 
*FOR CH 
* TIME 


aLYP HmMe ew ew ew ee HOM 


“m= 


me ee ee oe HIHMKPO Kee 8 0 8 ts 


FoR a E 2k kak ake ake ke ok 
* GO TO * 
* TIME-DELAY * 
x ROUTIN a. 

FOI IIR aC 2 ak ak i a 


Fe Ka A Fo Rk kK a 
x * 


* CHECKPOINT * 
* * 


He Re ee ee oe ake ae ke oh ae 


* O- 


Fe KC eK 


mim + 


#O 
QAM 40 eo oe ee HENOZOHM@Mse eo we wee 


poy 
= 
HHH HH 


* 
7 
* 
x 
* 
* 
* 


HE HK A Ae te eK Ke 


Me eo eee 


FER ICR G 3 dak ak tok kak kk 
* EXIT TO * 
* QSVCDISP * 


ee a 2 2 ie 2 ak ae a ae ae ke ke 
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YES 


ER CK B 4 ki keke a kok i ak ak 
* * 
* GET RECOVER * 


St ecccece eX* ADORESS AND * 


UAL COUNT * 


x 
dhe ee ke 2 ak 2 2 2c ok ie ie ae ak ok 2K 
Xx 
o*, 
C4 Ke HK HK RAR CH x 
oe *SET SEE 
o* 1S *. NO *ADDRESS 
*, RESIDUAL eXecccvcccee XX TRACK 
. COUNT O. RECOR 
+; o* * BUMP C 
Keg * We he ae Ko 
* "YE 
X 
feito D4 8k deta ie kk 
* GO TO RECOVER * 
* ADDRESS : 
Ae A A a ae 2 a Xe a ok i ke a 
He ao FG eo a ok 
x * 
x DISKIO x 
* * 
Wo aK ie ke Xe ok ote a x ak 
x 
He HK GG KK eK OK 
x * 


* SET _ UP DISK * 
S CHANNEL PROGRAMS 


* * 
HE ee 2 he ee a eae ak ae 2 
° 
e 
e 
oXe ve ccccevcccccccesccccee 
e 


x 
ROK H Gt tk ak ak 


* * 

HK KKKKEXCP REX & 
x START I/0 * 
* READ * 
* x 
Fe Re i a ok ae a ae ac 


Meeeee 


sok deatok J 4k tok dete ok 
* * 
* SET RECOVER * 
* ADDRESS AS * 
ZRETURN ADDRESS : 
SR ak a teak kak dea kok 


ee 8 © 6 


Rok ER K 4 dk te ete ik 
* EXIT TO * 
a QSVCDISP : 


We Re I He HK Hee oe OK 


— 








Chart CL. 


Al 
STARTLN/ 
STOPLN 


IJLQCL 
BI 
SAVE REGISTERS 
14-12 
INITIALIZE BASE 
REGISTER 


Cl 


GET RELATIVE 
LINE NUMBER 
SUPPLIED BY 
USER 


DI: 


GET DTF 
ADDRESS 
SUPPLIED BY 
USER 


El 


SET UNOPENED 
DTF ERROR FLAG 
FOR USER 


Fl 


HAS DTF BEEN 
OPENED 


RET 
Gl 


PUT USER'S 


ERROR FLAG IN 
REGISTER 15 


H1 


RESTORE 
REGISTERS 14-12 


JT: 
RETURN 










Change Line 


F2 


RESET ERROR 
YES FLAG AND SET 
INVALID RLN 
FLAG FOR USER 





SUPPLIED 
RLN TOO 
HIGH 


NO 


H2 


CLEAR USER'S 
ERROR 
INDICATOR 


J2 


START OR STOP\_ NO 
ALL LINES 


YES 









B3 BS 
GET START MODIFY CHANNEL 
ADDRESS OF AUTOPOLL YES PROGRAM TO GET 
















‘-LCB AREA AND 
ACCESS LCB FOR 
THIS LINE 


a 


C3 
START LINE 


INTERRUPTION AT 
END OF POLLING 
LIST 


LINE 


WTTA LINE. 


STARTLN1 





















D3 D5 
IS LINE 
PREPARE 
ALREADY CONVERSE Bis ee TED" 
ACTIVE MODE 


POST LCB TO 
ITSELF FOR 
ACTIVATION 








AS LINE 
HN ACTIVE 
TRANSMISSION 















POST TO LPS- 
QUEUE A HALT 
JO REQUEST 


NOTDIAL 


LINE ACTIVE 


WAIT FOR LINE 
TO BECOME 
INACTIVE 


TRYEXIT ° 
K4 


YES (“MORE LINES 
TO CONSIDER 


NO. 
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Chart CM. 


188 


Cancel Message Routine 


* 


SEEKEKE 


Magee tteovnesvseoseeeosoeeoeveseeeenesea 


TJLOCM 
SSP ERE TEE ne eee 
* CANCELM + 
* * 
REKKKEKEKKKEKEE 
x 
-*, o*. 
Bo. #, B3. 
o*® e Pe * 
-* 1S . NU .* ANY *. NO 
*,. ERROR MASK eKeccccceeX¥e DESIGNATED eMoccesescecceaceasseceecnseesneees 
- ZERO .* *, ERRORS .* 
e o* *. e 
*, * *., .* 
* YES * YES 
: x 
xX Xe 
KERR EC PREKEKKEKEK C3 *, 
#RECALL 16B2* s#DESTERR®. 
#4 = tk aH Ht NU .* BIT ON IN ® 
* #Xeeceeees%eMASK AND ERR .& 
* RECALL HEADER * *.HALF WORD. * 
KHEEKKKEEKEKEKEKEESE a * 
: * YES 
: x 
x o*. 
REKKK)PKEREKEKEER EK 03 *, eeex 
* * * 5S * 
*TURN UN CANCEL # o* PREVIOUS *. YES *MUL 
* BIT IN HEADER Srceccccek#e SEQUENCE eKccccc ce eX*BYT 
* PREF EX * *,NUMBER EQ.* x * CO 
x + *.ZERO .# - * 8B 
REKKEREKKEKEKKEKEKE *,. * é ¥XEK 
* NO : 
X ‘ 
RKEEKKE ZSEREKKEKEKE ~ 
* * é 
* RESTORE * ‘ 
*  PREVIOQUS eee 
*SEWUENCE NUMBER * 
REREKKESCKKEEKEEKEE 
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L * #0405 488668088 
ROUTE * * 

CLEAR ®eccccceeX® RETURN 

MODE * * 

LCBO rtitiete ttt ttt. 
SHHEREE 


* 
+ 
* 


ao 


Chart CP. Change Polling List Routine 





TuLoQce 
ECE A L EEKEREEKE 
+ * 
* CHNGP * 
* * 
EeEKEEESEKKKEEE 


Maceevee 


EEK LEEK EEEESE 
* * 


* SAVE * 
REGISTERS 14-124 


* * 
RREKEEK EK EKEKEEEKE 
x 
SEK | KKK EH SEH 
* LOAD PASSED #* 
*OTF ADDRESS AND* 
*OTF NOY OPENED * 
*ERROR FLAG FOR * 
USER 
REKEKEKEKEKEKEEKE 
x 
Dl *. KEKEK EY PEKREKKEKEKE 
* *. & * 
e* HAS THE *. YES * CLEAR DTF * 
*. OTF BEEN eFeccceceeX*® NOT OPENED * 
*. OPENED oe . ERROR FLAG : 
*,. .* EEEKEEEKEKEKKEKKE 
* NO e 
: : 
‘- E2 *,. HR KE ZS MRK RRR KKH 
; * *. * GET * 
° * 1s *. NU *THE ADDRESS OF * 
° *. PASSED RLN .®ecceeeeeX*® THE POLLING * 
e *.TOO HIGH .* * LIST FROM THE * 
° *, 5 * * D F * 
. *, o¥ MERE KK RHE KSEEKEK EK 
e * VES ° 
af ° e ° 
% : : 
=) e e x 
se 5 xX o*, 
4 HEREKE EKER EES 3° OO 
° * SET _INVALID_ * e-* USER *. EEK 
° * RELATIVE LINE * -* SPECIFIED *. YES #* * 
* * NUMBER ERROR * *®eSTATUS CHANGE. *..6.X¥* H4 * 
° * FLAG FOR USER * *. ONLY o* * * 
Be * * *, e* KEK 
e REE RHEKEKKEHEKEKEEK *. o* 
: : #" NO 
e ° A 
a ry G3 *, KKRSERCLHKERKERERSKERE 
: : se. Ss #s ; * GET LENGTH * 
e ° eo* NEW LIST *. YES * AND DECREMENT © 
° ° *®.SIZE EQUAL TO.*.c cee ee eX* TO START MOVE & 
° ° *,.0LD LIST . *IN 2NO POSITION® 
« « *.SIZE .* * * 
‘* * *, * KKGKEKERSKKEEKEES 
° ° * NO ° 
e ° e eee ‘ 
. e e * H4 F.X. 
e e e SE OS 3 
e ° x X 
‘s a REKEK YZ SAKE SEKE SKEEKEHEEKEKEEHESES 
. e * * * GET * 
° ° * LOAD * *THE ADORESS OF * 
° . *INVALIO LENGTH * * THE QMOVER * 
e ° * ERROR FLAG * * ROUTINE IN * 
° ° * * * IJLQIP * 
4 e SEEK EEKEKKEKKEK KEKKKKKEKEKEEKECE 
e ° xX x 
° s KHEKEK I ZEKSHEKEREEKE OO [OO EKEEEE 
: ; * LOAD * aeeeQPOST Sees 
° x * USER*S ERROR * * POST QMOVER * 
Cee ccc cccaccencvcescceasvecanesecssesescccscce se X¥ N FXecccooee*® TO ITSELF TO * 
Pasadena tr cone WEXECUTE MOVE © 
KKKEKKEKRESESEKESEKE SSCS HEERESE 
x 
REEEK 3 EKEKREEKESES 


* RESTORE REGS * 
yO-12 AND RETURN* 


R * 
KEREKEEEKE EE EEE 
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Chart CR. 


Al 












IJLQCR 


Bl 


SAVE REGISTERS 
12-14 


Cl 





GET VECTOR 
TABLE ADDRESS 


DI 


GET CHECK- 
POINT DTF 
ADDRESS 


INTVL CHKPT 
SPECIFIED INVNO 
MESSAGE 
CONTROL 


YES 


Fl 


GET ERROR 
CODE 


Gl 


STORE IN 
SAVE AREA 


H1 


RESTORE 
REGISTERS 
12-14 


J] 
RETURN 


190 


Checkpoint-Restart Routine 


E2 
SHOULD 
CKREQ BE = 
ISSUED 


NO 


A3 


GET MODULE 
BASE 


B3 
SET CHECK- 


POINT 
PRIORITY 


C3 


GET ELEMENT 
ADDRESS 


D3 
QPOST 










_ REQUEST 
CHECKPOINT 


E3 


GET QCB 
ADDRESS FOR 
WAIT 


F3 
QWAIT 







WAIT FOR 
CHECKPOINT 
COMPLETION 


G3 


INDICATE 
GOOD CHECK- 
POINT TAKEN 
(IN SAVE AREA) 
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Chart CT. Change Terminal Table Entry Routine 


fi 
a, 
1JLOcT 
BR A) a a RO ae 
x * 
* CHNGT * 
* * 
me a a 
x 
MR Kh) a 
SAVE 
*REGISTERS 14-12% 
* ANU CLEAR THE * 
* USER'S ERROR * 
* INDICATOR * 
ek aR Reig it kok ae ak 
X 
BRR BR | Kee eK 
* LOAD * 
* WORKING * 
*PARAMETERS AND * 
* ACCESS FIRST #* 
* ENTRY * 
SO RR ia Rot a 
x 
o*. o*. 
Dl €y 2 x, RRA EKL) ZEEE KKK 
-* IS *, o* 8615 *, * INITLALIZE * 
°* THIS THE *. YES o* NEW ENTRY *. YES *AND GET ADDRESS * 
eee X®. ENTRY TO BE e® eee e cee X*eSEZt EQUAL TOL Fee e ee ee eX* UF QMOVE QCB * 
° *. CHANGED . *#.0LN SIZE .* * FOR CHANGING * 
° *, *# x, ° * ENTRY * 
- x, 4% x, 4X REREE ERE EK EK 
° * NO * NO . 
; K : . 
e 0 *, X x 
‘ El *, HRKE KE DK EKER EEK KEKE E ZREK ERE ES 
° -* *. * SET X*1LO* * *GET THE ADDRESS* 
° 2* IS THES *. YES % AS ERRUR * * GF THE * 
° *. THE LAST eK eccves * INDICATOR FUR *eccces * DESTINATION * 
° « ENTRY .* ° *INVALIV LENGTH * ° *QUEUE QCB FROM * 
e x. * ° * * e * THE TERMTBL * 
x, Ae ‘ RR ER ERE EE EK : REE EERE EEK EE EE 
: * NO ° . . 
oe : x : : x 
e a o o*e e e o*, 

: : Fl *, < REKKKP PKRKEKEKEKES ‘. F3 et. REKEKEGEKESSKEKKE 
* e*SIZE OF*. ° * SET x20! * . e*1IS IT A¥. * * 
. -* ENTRY *. YES X * AS ERROR * . «* TERMINAL *. YES * CALCULATE THE * 
° B.INDICATED AS eo eeev eee eX* INJICATOR FUR * ° &. DESTINATION w®eecee oe eX*#LCB ADDRESS FOR* 
* *, ZERO IN .* * ENVALID TABLE * ° *. o* * THE TERMINAL * 
* *.TABLE.* * ENTRY * . *. * * * 
é *. 4% RE ERR KERR EE EEK . ee. Oe REREEKEREEE EERE SE 
* * NO ° ° * NU ° 
: : i : : x 
e x 2 e x o*, 

‘ HR EEG | RRR ERE EK ‘ . KEKE GFE REE E EES G4 *, 
. * * . . *ADJUST THE SIZE* -* *. 

. * ACCESS THE * * ° * U AT THE * YES .* HAS STOP ° 
eeee*® NEXT ENTRY IN * ° ° *LENGTH BYTE [S ®X.cceeeee*®.e LINE BEEN o* 
* TERMTBL * e . * NUT OISTURBED * *. ISSUED. 

* * . ° * IN MOVE * *. o* 

We RR a KR . ‘‘ SREEKERERAEK EEK EEK *. * 
° ° e * NO 
: : xX x 
y i" EE ZR EEE KE SEHGEREKEES 
x ‘ ¥KEEQPOST KKK EKEKQOPOST RHEE 
e . *CAUSE MOVE TO * CAUSE QCB_ * 
. . *BE EXECUTED FOR* * ADDRESS 10 BE * 
* . sENTIRE ENTRY * * MOVED TO * 
° . * * * TERMTBL * 
° ° RRR ESE RH eK doe 
4 : x xX 
S - HOR BR EK KEKE I GEER ERERES 
° ° * LOAD ERROR * * BYPASS * 
° Xx * FLAG IN x * SEQUENCE * 
eeccecccscccccce eX *REGISTER 15 AND¥Xee * NUMBERS IN * 
* RESTORE * ° * TEKMTBL AND *€ 
*REGISTERS 0-12 * . * WORKAREA * 
REE ECKERT ER EES - MERCER EREAKESE ] 
: : X 
xX ° EK GEREKEEE 
KEE KZRKERKEKEK 7 *EeKOPOST KEES 
* * ° * CAUSE * 
*RETURN TO USER * ecoeee*® REMAINDER OF * 
* * * ENTRY TO BE * 
KSKEKKEKEREKE KE * CHANGED * 
CREEKS 
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Chart C1. OQOTAM Close Routine (Phase i) 


SOR ROR K 3 2b Rok gk dete 
* * 
* TURN DTF OPEN * 
* BIT OFF : 


* * 
BR Re He a he he ee ake ke ak ak 


SRR AA 2% OH RE RK 
* * 
: $$BCQCOl1 : 
HHH det tk do ak ROK 
* * ° 
* C2 * ° 
* * ° 
ea ° 
° TJLQC1 x 
Ps eB 2 Rk ek Hk HK 
é x * 
. *GET CURRENT DTF* 
° * ADDRESS * 
. * * 
‘ % * 
. ARR RoR tok dk tok ak ak 
6.6 0'* 6 0:056: 610.6 6-006: 6 0.0 60.050 006K: 2 
x 
TESTACL o *e o*. 
C2 *. C3 *. 
* *, * *e 
e* IS OTF *. YES 0% VALID *. NO 
*, OPENED o%XeccceceeXXe QTAM OTF oXeces 
Ke o* *e TYPE * e 
*, o * Xe o* e 
x. 4 & ¥e 4% x 
*NO *YES HEX 
é ‘. * * 
° . * J2 * 
‘ = xk 
oXeccvcccccce e RHR 
X e X . 
EXITAC1 EXITC] o ¥ e o*. 
D2 *e ° D3 *. 
ate ae ak ake DD ak 2 ak ak ak ak ok o* *, ‘< e* OTF *. CKD Ga ko ak ek 
* RETURN TO DOS * . NO .* MORE eo ° o% TYPE *. YES *CALL_ QTAM CLOSE* 
* CLOSE MONITOR *Xeceeeoee*e OTF TO BE o* ° %eXT524y XI5B oe ec cece eo X* PHASE 2 * 
* $$BCLOSE * x *. CLOSED .* ° *.OR X*55" .* * $$BCQC 02 * 
BRO RR ROR RR a s *, .* ‘ Ks o%* eR ROR RR BO a HI 
e Xe 0% e Xe o* 
e *YES ° *NO 
@ e id xX 
e GETNXTC1 X ° o*. NORM 
: eR RE Dok i ak dake ate ake . “ E3 %e We a a aE Go a a a a RK tek OK E 5 ok eo KK 
‘ x * e ° ‘ * * * * 
* * GET NEXT OTF * ° o%* *. NO * SEARCH OTF * *REMOVE DTF FROM* 
° % ADDRESS * ° %o CHECKPOINT .*eeeeeeeeX* ADDRESS IN Ke ew cece eX CHAIN * 
° : : ° *. OTF r * CHAIN * . : 
e e e e t 
s RO ROR RR RRO . *%. 2% RR RR RR RR RR RR RR BR Re Rk RR Ri eae a ee 
e e 2 *YES e 
° ° . x x 
° X « CHKPNTC1  .*. 0%, 
‘s HR RORE De RR Rk ee he < F3 a F5 *. 
e * * ° e* IS *e o* %e 
e * INCREMENT DTF * e o* MESSAGE *. NO NO .* LINE *, 
e * LIST POINTER * e *e CONTROL oKccccvcccecscccocssces eoce Xe GROUP OTF e* 
° * * ° e ACTIVE .* e ° *, o* 
e * * es Xe * @ e *., o* 
ee Bek Rak tok dak fake og ak ak ok a x, 4X ; ‘ *, .* 
* e ° *YES ° ° *YES 
e e eo e e e oXaceccccecvese 
eo xX e xX e s @e e 
Ld o Xe s o%*e ERR1C1 e e x es 
_ G2 *, ‘* G3 x, x - HR AG HR ER EK é 
‘ * *, a o* x. HK AG Ge RK HK HK HK . x * < 
° NO .* QT AM %e e NO .* SYSTEM *, *CALL MSGWTR TO * ° * GET (FIRST) * ° 
ecceee%s DTF TYPE 0% eXeeoe%*e CLOSE IN o%® * SHOW INVALID * ° * (NEXT) LINE * . 
*e o* . *.PROGRESS .* *CLOSE SEQUENCE * ° * * ° 
. 7 ° x, o* RR RR RR ck aOR > * * ” 
Soe ‘s xe LX < ek ok kak ok kd oe ok e 
*YES ° *YES ° ° e 
x e e * oe e 
o *, ° X e x e 
H2 *. _ 40K 2H 3 ok ak ak % HEH He RK . 
tok ok o* *, ‘ CLEAR * a KE X C Pek s 
* * YES .* VALID Xe ° * CHECKPOINT * ° * WRITE * ° 
* C2 *Xeeee%e QTAM OTF o* . *ROUTINE ADORESS* ° * THRESHOLD * ° 
x * *. TYPE 2X . *IN VECTOR TABLE* ° * COUNTERS * ° 
eK ek x, .* < * a * * ‘ 
%e 6 ® é eR RR Rk Ro og kok ae ak m se go ek tk a . 
Sek * ° : : ; 
* * e e e e o e 
x J2 Keee e e e e ° 
* x . . ° ° ° 
$k OK 5 ‘ * ° x ° 
ERR2C1 ° e xX ° o *. ° 
X ; BO J BR ea tk ° J5 *, e 
eK KS 2 ROR tok ok kk ‘ Rem EX CP a he ok s o* ‘ a 
*CALL MSGWTR TO * ° * WRITE * ° o * MORE *e YES. 
* SHOW INVALID * ° * PROPERLY * e *. LINES TO oXeeee 
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Chart C3. QTAM Close Routine (Phase 3) 
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PS Or eer tr ae ee ee ee ee ee . 
x e 
0X, CLOSALCB xX 
H2 Ke RR RR KH JA Rt at ae ae ake ak RR KH 4 tok ok Rok tot ak 
‘i x, * * x * 
YES .* DASO Ke * GET (FIRST) * * RESTORE DOS * 
eoeX%e OTF TYPE Pe see AS (NEXT) ALCB : *OTAM INTERFACE - 
= , 7% - x * * * 
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Chart DA. 


Disk-End Appendage (Part 1 of 2) 
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Chart DB. Disk-End Appendage (Part 2 of 2) 
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Chart DC. Disk I/O Routine 
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Chart DE. Copy Terminal Table Entry Routine 


TJLOQDE 
RHKEKADERREERERE 
* * 
* COPYT * 
* * 
Perrtrtrre re tts 


Meee eee 


BKK KD REE 
x * 
* SAVE * 
SREGTOTERS b4-128 


* * 
MR KK EH 


wee eee 


RC DR RK 
* * 


* CLEAR ERROR * 
* INDICATOR AND * 
SEVAD PARAMETERS® 
WK REE KKK KK ERE 


Ke ee ee 


HH 2 Re tok kee 
* 


* LOCATE THE 
* BEGINNING OF 
TERMTBL 


KO SO a a i 


% 
tt Ht tt bt 


X 
KKERKE DER EERE EKER 
x 
* SEARCH * 
* TERMTBL FOR #* 
& TERMNAM $ 
HEKRERERREEER EERE 
: 
2 # SRR EP 3 tO ee RE 
.* , * SET INVALID # 
.* *, NU *TERMINAL TABLE * 
#. ENTKY FOUND .®eeceeeeeX® ENTRY ERROR 
*. .* * INDICATOR FOR * 
*, -* USER 
ae PRR ERR EEE ERE E 
* YES 
x 


BRR, DEKE KEKE HE 
* MOVE TERMINAL *& 
* ENTRY TO * 
* WORKAREA * 
* STARTING IN * 
* FIKST BYTE * 
Be RRR ee ee 


Mee ea ee ee HOY 


REE IDES 


* * 
Hg. TO USER * 

* 
We RR aR KK KK 


198 DOS QTAM Program Logic Manual 








Chart DL. 
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*. ROUTINE «* * ENDINSRT * 
*, * * ROUTINE * 
*, 2 *¥ He Se Xk ee eK a a eK ok 
* NO . 
acu caear taunts ar eee eee. 
x 


EKG DERE ER RK 
« EXIT * 
*TO PRIORITY IN * 
* SUP * 


Vv 
UR RoR a dak dk 


kak RK 
*DL * 
x A4t 
* * 
& 
X 
CR EKKAG EEA HEEEE 
* GET OFFSET * 
*FROM THE LCB TO® 
*THE NEXT ENTRY * 
*IN DISTRIBUTION® 
* LIST + 
RCI ok a i 
x 
o*., 
B4 *, 
o* IS ° 
-* THERE A * 
*.DISTRIBUTION 
*. LIST o* 
* SENTRY .* 
ca 
* YES 
x 


COREE GEKKEEEEEEKEEK 


# SAVE HEADER * 
* FOR INSERTION * 


* INTU QUEUE DOF * 

* THE NEXT * 

* DESTINATION * 

CHEE EEKEE EEE ER 
X 


KERRY GRRE KKK E 
& * 


*BUMP OFFSET TO * 
*THE NEXT ENTRY © 
* IN THE LIST et 


x 
Re OR ge te ee ke ie fe ake ee 
. 
= 


eeeecveovses ee enaes ean eeeone sen 


DLTEST x 
ROME K, GEEKKKKKKEEK 
« STORE + 
@iyt STENATION KEY® 
* "IN LCB AS * 
U eth SET TO NEXT #& 
* (NTRY IN LIST ® 
CRAM KEKE 
p : 
L x 
o*.e 
F4 x, 
™ 1s *. 
I .* THERE AN ®. NO 
#>intRyY IN THE 
*. TERMINAL « 
*. TABLE .* 
C *, oe 
* YES 
A - 
x 
COOK CGHEREREE ERE 
T + * 
* GtT ADDRESS #* 
C * OF TERMTBL) * 
* ENTRY * 
E + * 
SOOKE KKECEKEKE 
U ‘ 
p : 
x 
cee weHaetereeeees 
E 


sPut WcB ADDRESS* 


*FOR ENTRY INTO Stee ene a T 
LCB * 


: THE 
coe enEHERKEREREES 


oFeccccaee 


Pe 


HERE 
*16 * 
* F5* 
* * 
* 
eee 
*16 * 
* F5¢€ 
* * 
* 
HEKREH HS OEEEESEEE EE 
SRECALL DDD4* 
*~¢-*—€—4—4-—€-6—% 
QO RECALL #* 
ROUTINE TO * 
RETRIEVE HEADER® 
CHEKEEKESEREEEES ESE 
x 
CEE IF EREEKEEREDS 


PUT * 
*DESTINATION_IN & 
*PREFIX AND TURN® 
* OFF BIT * 


THE 2 
IN LSTA 
ESSE EKEEESERES SE 
: 
x 
coneekseecceertee 
* 


pal ADORESS OF : 

THE BUFFER * 
*CLEANUP ROUTINES 
seeeeneeeeseeness 
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Chart DP. Copy Polling List Routine 


1 JLQ0P 
SESHAZESOSSESES 
* copyp * 
* * 
SEKSESEEEEEEETE 


meee eee 


Stesenzeseecetees 
* SAVE * 
SREGISTERS 14-12% 


* . * 
SHEKEKKAKEEKEKEKESE 


see Oe ee 


SSRKKE PEKEERKEKESE 


*ERROR FLAG FOR ; 


* USE 
EREEEEEESRESEREREE 
xk 
D2. SEREKOZ SERRE ER EEE 
.# *, * * 
e*® HAS THE *. YES * CLEAR OTF * 
*. OTF BEEN eoFecccececX*® NOT OPENED * 
*. OPENED Ps : ERROR FLAG . 
"ee. ot SEREREREEREEERESE 
* NO e 
: 
7 63° | &, HRKEREGLSERESEREES 
° o* *. * SET INVALID * 
° o* Is *. YES * RELATIVE LINE © 
‘. *. PASSED RLN) e®ecccceeoX* NUMBER ERROR * 
° *.TOO HIGH .* 4 FLAG FOR USER i 
: ee a $ERSEEEEEESEEESED 
° * NO ° 
: x ye 
ERASE 3 O8EREKRERES ; 
e * GET * ° 
° *THE ADDRESS OF * ° 
° * TRE POLLING #*# . 
° ve LIST FROM THE ‘ ° 
: EREEREEEERE EEE ERE : 
: x : 
c €EKEEG IEEE EERRERE : 
° *GET THE LENGTH # e 
e * FROM THE POLL * ° 
e * tIST ANO COPY * e 
° * POLLING LIST #* e 
° * INTO WORKAREA * e 
: EEREEEERERERE REE : 
Bs i Bice te aeee as Soba Moh eaasaus wea ae ses waeawadens 
x 
KERCEHZHEERER ERED 
* LOAD * 
* USER'S ERROR 
* FLAG IN * 
*REGISTER 15 FOR* 
* RETURN * 
EK AEEKEEERERESESE 
x 
KEK SZ ORERERRERE 
x * 


* RESTORE * 
AcE ATERS 0-12 : 


* x 
SEKEKEKESEEKEKREEKE 


meee eee 


KEKE KZ SRSHREERE 


* * 
SRETURN TO USER 4 
CERES CESEEEESE 
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Chart DQ. Copy Queue Control Block Routine 





IJLQDQ 
SEKEADPARKEKKKEKE 
x* * 
% COPYQ * 
* * 
REKEKCKKKHKEERES 
e 
ss 
e 
® 
e 
e 
x 
REKKKGYDKEKKKKERKESE 
* * 


* SAVE * 
REGISTERS 14-12% 


* * 
REESE EKKEKKKE KKK 


eee ee 


CAKE 2 EEEEEEE EEE 
* CLEAR * 
*ERROR ENDICATOR® 
* AND LOAD * 
* PARAMETER 


* 
* REGISTERS * 
CERKEKER EE EE KEKE 


mee ee 


KEKE KY) DEERE 
* 


* 
* LOCATE * 
* BEGINNING OF * 
: TERMTBL : 
rrr rrrT TT TTT TTT T. 
x 
REEKKE DEREK ERE E 
* * 
* SEARCH * 
* TERMTBL FOR * 
* TERMNAME 
wrrer rer ttt eT re se 
ae : 
is x 
My / F2. KERERE ZEEE EERE 
hoo se . SET x'04" = # 
-* — t#. NO * IN ERROR _ * 
#2 ENTRY FOUND o*.eeeeeeeX# INDICATOR FOR * 
° e * INVALID QCB * 
*, o * * NAME * 
*. ot errr ret re Tre rst 
*” YES 
x 
FERKEG 2 ERE EER EES 
Ps * 


* GET QCb 
* ADDRESS FROM 
* ENTRY 


Hee 


b 4 
KR RK RAKE RKKE EK 


5 ee er 


BEEK DO KRKEKEKEKEK 
* « 


* MOVE OCB 
* INFO TO WORK 
* AREA 


% Ht 


* 
KEEKEKRKEKAKKKKEKE & 
e 
eo 
J 


oXewevcccccscsccvrecvssecveses 


X 
EKER DEERE EKK 
* “LOAD * 
* USER"S ERROR * 
AND * 
ORE * 
S * 
ex * 


ton > 
HNN 


n- 7 
wee ee 68 oe eI 


RHERKK 2 EKRERRERE 
* 


* 
Be euEN TO USER ba 
REECE KKEKREKEKRKSE 
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Chart DT. 


Date Stamp Routine 


TJLQOT 


EERE AZ TEESE EEE 


* * 
*  DATESTMP « 
* * 

REEKEKKEKERKREKSE KE 


Meeesvneve 


ok eB 9 ee 


*EXPAND EXAL* 
K— €—%— ¥— HK 8 HE 


2 25 25 5 
* GET DATE * 
* CUMM A 
x R 


* 
TION * 
* 


-=GION 


KeKEKCZ 
* 
COR Sk kK eK 


%* OND 


FR 
UN 
E 
* 


* 
ee KKK 


> 7 ee ee: eC laniwe: > oe ae oe Se Be ee oy ol 


KKK YZ, REESE E EEK E 


UNPACK DATE 
INFO 


dt tt tt tt tt 
HHH HT 


RRR E KEKE EEK KKK 


Mee eee 


REKKEESRERKEKKERE 
* * 


* MOVE * 
*FORMATTED DATE * 
* INTO HEADER z 


KEK ERKK ERK EREE EK 


mee ee 0 @ 


REEL ZEKE RR KES 
* * 
* RETURN * 
* x 

KOREEKEEEKEE EEE 
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Chart D1. 


IBM 7772 Disk End Appendage 


at A 3 OR Bok tok 
* 7772 OISK * 
: APPENDAGE : 


OK He he te Re ee he a eK eK 
x 
IJLOAD o*e 
B32 Oy 
* x Ke ee 2 BG he he eK ae aK ae a 
-* UNIT *. YES * RETURN TO * 
*. BUSY oXecccccoeX*SUPERVISOR VIA * 
° o* * REGISTER 7 * 
*. o* ROR IR RR RRR a ae ak ae 
OH 
*NO 
Xx 
Me Re HE CFB ee a ok he oe 
* * 
*SAVE SUPERVISOR* 
* REGISTERS —* 
* x 
He Re Re Re he 2 ae 2 2 ae 2 ok 
x 
We MK eR HK 1) Fe KH a HK a 
* INITIALIZE * 
*BASES FOR QTAM * 
SVC_ AN * 
*IMPLEMENTATION * 
ROUTINE 
We ee Re ah ah 2 a ae he ae ae ok ok i a 
x 
eK ek x E Fk Ko a KKK 
x * 
* GET _ALCB * 
* ADDRESS FROM * 
* DCV BUFFER * 
* Peet. 
We Re ae ae fe i ah ak ak ee oh oo ok *D] * 
: * FG 
2 * * 
. * 
xX - 
“ey MESSAGEA_ X 
F3 x, Me Fy eo ek ee eK 
.* 3 *GET ADDRESS OF * 
o* IS - YES * ERP MESSAGE * 
*. RECORD NOT .®.ceeeee oX¥ WRITER * 
*. FOUND .* * INITIATOR = # 
*, 2% FAR IOIIOIIOI IAI RI ak 
*NO 
x se 
o*., xX 
FRR RG 2k tok tok tok tok G3 *. BORCICAOR GG tO RC a a a ak ak 
x x * *. * 1 JLQMW * 
* COMPUTE OCV * NO .* ANY ¥ kk - HK RK 
* WORD LENGTH ¥*Xeeeeeeee%. OTHER ERROR .* * PRINT ERROR * 
* x *, -* x MESSAGE * 
* * His * * 
Ae OR eK eo abe oe a a a a ake *, «X eRe kit be pe ae oe oe ae a ake 
: *YES : 
J weccccescccanccecccaacccccess Xe 
x os 
*, X 
H2 Xe Me a mb | dy ie oh oe ee oe a 
x * * * 
-* WORD *. YES *SET £RROR TONE * 
*. LENGTH ae * IN ALCB * 
- ERROR . ‘: 
*, eX ‘ * * 
xX, 4 & Xx RO RO ROR ee ok fe i oe 
*NO Hh  & ‘ 
e * * e 
3 * FG x ; 
‘ * * : 
* eK * 
x X 
eH YD aK ah he ake a he oe eR HG ORC te ae ae 2 a a 
x * 
*STORE DCV WORD * * SET LAST WORD * 
*LENGTH IN ALCB * * FLAG ON * 
* x * 

* * * x 
ER Me He ae eke he oe a ake ke ak aK fc ROR ROR ROHR he ek he a a 
X X 
HK KK DK HM eK HK RK mK KK KKK HK 
* EXIT TO * * EXIT TO * 
*  IJLQAD60 * *  IJLQAD60 * 
* * * * 
We We a a ae ae eke hehe a ah ak KH OOH HK KK EK KK 
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Chart D2. IBM 7772 Disk Read Routine 
ae teak 
* * 
* Al * 
* x 
eae ok 
x 
o ¥, DISKRG o%*. 
Al 6 2 *e 
Z Pe e* FIRST *.e ok A Bk tok teak ok a kok Me oak ok A 5 tek ae ak te a ke atk 
o* AUSE *. YES e WORD OR *. YES *7772 DISK READ * * EXIT TO * 
x, ELEMENT eXcccco eee XX. PREVIOUS o*éeee x ROUTINE * * IJLQAD60 * 
a o* *. PAUSE .* . * * * * 
K ox x, 7% pa lok tok bok tog kok kote ki $I Rak hekokoke kok ke teak a tk 
Xe * %. 2 ¥ X ° * * 
NO *NO eo ‘ * B4 * e 
Hk es ss * * ‘es * * « 
* e e * B4 * . te Hee i 
* Bl Keee e * * = ° ¢ 
* & e KK e e OX e 16.4:6 6 06 eee 
Rohe teak X * X e e . 
DISKREAD .*. X IJLQAD30 .*. DRDISB xX e *NO e 
B x, FRR ORB Dk Ra kok a ok atc ak ak B3 x, Tre ri Werte rer ess B5 *e e 
0% * * SAVE PAUSE x . Xe x * o* %e . 
* WORD *. YES * COUNT AND * 7% ALCB *. YES * SET DISABLE * * at Ke e 
Ke ALREADY oXcece * INCREMENT * *. HALT I/0 bie eeale.e%s FLAG ON Ke cecccecX%e FOUND o* ° 
e FOUND. - * ADORESS CHAIN * *. FLAG ON .* * % ° e 
*e * e * POINTER * ° * * * e x, * . 
x OX xX RR RR Fok tok gk fog atk ak xe 4x Foto ok gob tke a ate steak tote kok ak : xe 6 ¥ ; 
*NO wea ° *NO ° YES ° 
7 * * ° 7 < eka x é * 
a * C5 * ° e e * * e ° 
e * * e e e * c5 KX eee e 
is KC e . é * *- 6 - 
‘ 3 X Py % KH xX e 
xX e oX*e s eo Xe e 
FOR RRC Dokki ok akate ak ak ak é C3 *, ea RIC he a eo ae teak he ak " C5 *e e 
x SAVE WORD * . o% *e * * < o* *., e 
* ADDRESS AND * ‘s e* INITIAL *.e YES * CLEAR ADDRESS * Pi o* DISK x. NO . 
* INCREMENT * ° *. WORD FLAG e*cececeeeeX*® CHAIN POINTER * ° Xe EXIT oXeccce 
* ADDRESS CHAIN * e 7 ON 7% * * . *. ox 
POINTER * e *. * * * e x, Pe 
ROR RO ag RC feof ake abe af ate a ae ak ai a 2 * Ak FOR RR ROR SRR RR beak kc is *, 3 * 
eo e *NO e e *xYES 
eo Pe ee er a ee Re eee OP ee ee ae ee ae s e 
X ° ° 
0%, REREAD oe eDISKEXIT xX 
Ol He 03 x, <é Fok RICK D5 kok a ko Rok tk 
eXADDRESS*. EK KK * % ° * * 
o* CHAIN *. YES * * ex LAST *. YES * *GET DCV BUFFER * 
x, LENGTH oe @eeee * D3 Keech *< WORD FLAG ee Ode eS es 2 OWS WARES OOOO *xADDR FROM ALCB * 
*. EXCEEDED . . * * e ON o* * * 
Ke o* 4s HOt x, x * * 
*. Ok x Ke 6 ¥ ROR RR RR Be Re age ake aK ae ae ae a a a 
*NO ae *NO < 
e * x . e 
. * H5 * ° e 
. eo * * e e 
. 2 ok i. ° 
x ° ° 
o*, DISKRA X X 
El Xe He KE De a ae ae ke oe ake ake ak We Re RRC EB ak ae abe ake ak ae ak fe afc ak ROR ROE 4 ke ato ak ake keg ak afc kc Re Re ate ak EG ae a ae ae a ate a ak a 
o* %e * x *GET ADDRESS OF * * * * * 
«* ADDRESS *. YES * SET LAST WORD * * ADDRESS CHAIN * *GET DTF ADDRESS* * GET LPS QUEUE * 
* CHAIN oXeeccece oX* FLAG ON * * BUFFER FROM * 00 oX* FROM ALCB * * ADDRESS * 
* <EXHAUSTED.* * ALCB * e * 
x, o* x * * * * * * * Ed 
Ke ox ROR RR gk tok tet kok fee ake afc ak FR RIOR OR ROR a ake age ake af ake akc ak es SRR Rate ac af ak afc ae ak ak ate ae a ROR ROR Rk teak aca eke ak a ak oak 
*NO e oe ‘J e e 
eK 0.6 056.6: 6w eel e.6 o 6.0 6:06.66 66 60-0 e e e se 
oe xX e e oe 
X COREREAD 7%. e X ° 
ROME RG Raf EDD ae ake ake ake ae eae ae atk 3 RRR Dok oak kote tote ak a ak F3 x, * FRR ROK 6 tor a a ae ee ate aie ak xX 
* CLEAR PAUSE * * * o* x, se * * He eh oe FS a ao 
*FIELD AND RESET* *SEARCH DCV WORD* % *. YES . * GET FIRST * * EXIT TO * 
* INITIAL WORD * oe eX* ENTRY IN WORD * *e INVITATIONAL eee ccee * INVITATIONAL * * QSVCPOST * 
* FLAG * ° x TABLE * *. WRITE . * WORD ADDRESS’ * * 
x * . * * . o* * * te tag ak ate ak aca dk ak ak ek 
ORR tok a kg kak kate aac ke ae ak 2 BOR ROR RR tok tee afc ak tok akc ak ak kee Be a a a a ke a of ae fe ae a ak af ac ak ak 
eo e e *NO e 
e e e eK We 10's! 01016610616 64766 © 6.6.06 050868 
X e Xx eo 
BC oXe s eX, X Xe 
G1 *. ° G2 *. He RE RR GF ae ae ae ae a ae ak ak G4 *e ak tok kG 5 a tok ok de ak goto 
o* x, Pa o* Ke * * * x, * * 
-* DISK OR *. CORE . o* wORD *. NO *UPDATE ADORESS * Py INITIAL *. YES *SET REPEAT BIT * 
*. CORE WORD .*eeeece *.e ENTRY FOUND .*ecce * CHAIN ADDRESS * oe eX*®e WORD FLAG «¥*eewceeeeX*O0N IN THE ALCB *ecece 
x, Pe 3 *. 0% . * POINTER * ° e ON ° * ERROR BYTE * ° 
xe x *. o* ~ x * a x, * * * a 
x *. 4 x FOR ROR ORR ROR Of i at pk ke ak ake ok ‘s <8 spe Hea a a Re ak ae a ae oe ake ac ae x 
*DISK *YES ok ak ok Ps . *NO KKK 
* . *D1 * ¥ < . ae ek * * 
° e * F4*% ‘. ° 7 x * * B4* 
° e x * . ° . * HS *eee * * 
e Py * « . ‘ * x 4 ae 
xX e X ° x ee fe 2k . 
o*. xX DISKRB aX, e o*. DISKRC xX 
H1 x, eo Ra RH Dak akc ke af ake ae ak ak ake a H3 a ie H4 x, ee Re te HY aie abe a a ae ok ak a 
e*BUFFER Ke * * Pr x, e * *, * x 
-* POOL AND « NO * SAVE WORD * -* REPEAT *. YES . e* REPEAT *. YES * SET LAST WORD * 
*. VALID DISK eXecee *LENGTH AND WORD* ¥, ELEMENT eoXcccuce *. COUNT EQUAL «*cccceee eX* FLAG ON * 
*. ADDRESS . e *  ADORESS IN * *. o* *. ZERO ° 
Rs XX e * ALCB * x, * oe e * * 
xe 4k x he ae ke ok ake ake aac ak ae ae fe af a aie ak xe ot %e eX ek Bak ate ak ak a ate ake at ak a ate ak ak ok 
*YES HK KK « *NO *NQ ° 
so *D1 * e e e e 
e * F4% @eeeeneeneeeneoe e e e 
e * x e + e e 
e e x * x 
x « DISKRFE o*. DISKRD X o*e 
Re Rt JD ta ak a ok aca ak eH Ro Dk teak tea abe ake ak ake ok s J3 x, RRR Gk Fk teak toe ak ke 3k J5 *. 
* * *PREPARE BUFFER * e o* *, * * * *, 
*GET DCV BUFFER * *CHANNEL PROGRAM* ° o* DISK *. YES * DECREMENT * o* WORD *. YES 
* FROM ALCB * eeeX* TO READ DCV * e % WORD oXecee * REPEAT COUNT * oe eX*e ALREADY o*cece 
* * % ORD * ° - ACDRESS . . * * ° « FOUND’ .* ° 
* * e x x : *. * - * * x ° * ~ 
ROR RO a kok tak a ae ak ak ate ae ak « RRR I ok tok dak tok ktook * xe OX X Ae Re a ee eR a ae a ae ak a ak ae 2k e x. 2% xX 
. i < < *NO He FO 7 2 *NO AK KK 
° e e e oe * * e e e * * 
° ‘s . _ a * Bl * . < * C5* 
e e e e x * * e ‘o x * *x 
e e eXoecccccccece Rk a He A e e KK KKK 
e e e * *x e e * * 
x . x * Al * X . * B4 * 
SRR RK ok ak teak teak ofc ak 3 ec ee OLE Ler eet £ * * ea I a aK Ge a a ae ae aa ae oe ak e * * 
* AREA ELAG AND # > ¥SET woR * ee ; * : meee 
. * WORD FOUND * *RESTORE ADDORESS* ° 
* SAVE BUFFER *scecee * FLAG ON * * CHAIN COUNTER *e.ccace 
*AREA ADDRESS IN* * : pene x 
* ALCB * * x * *x 
eR ab a oe ak ae ake ae ae a a ae te ai a Se Rete a a teak ai ake a te a ok ake ak PoS SSCL SI C£ SS CLS Sf 
xX 
HK 
* * 
* D3 * 
* * 
eK ok 
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Chart D3. IBM 7772 Line Write Routine 





HK HK KKK 
* * * * 
* AL x * AZ * 
* * * * 
tO GOK 
° X 
WLINEC X -*. 
aR RIOR AD go a tok tok ak A2 %, 
x * .* *. ad © te a 
*SET SLI AND DC * o%* WRITE *. YES *7772 LINE WRITE* 
*FLAGS IN WRITE * *e AFTER o*e eee * ROUTINE * 
* CCW * *, ENABLE .* s * * 
* * ee * 2 SOOO ROR I ag gg a kok 
We Ra RR a RC RC eR *.  ¥ x a! 
6 *NO RK Ke 7 
* ‘* x * 
. ° * El * . 
- is * * ° 
6 - ee He é 
7 X xX 
xX o Xe IJLQAD60  .*. o*, 
Fa goto B Da ier ik dak tote B2 *, B3 Ke B4 . ok aOR B Stok kok gai keke 
* * * * .* *. o* *, : * 
*SET SLI ANO CC * e* INQUIRY *. NO -* DISABLE *. YES INITIAL *. YES TE ALCB * 
*FLAGS IN WRITE * *e MODE oF ecee x. FLAG ON hice cateee kee CCW FLAG ON Cee eee eee XECHANNEL PROGRAM* 
* PAUSE CCW * x. o* . *e * *e o* * FOR DISABLE * 
* * x, o* - *. oo * *. o* * 
Se RR ee i ak ef ote ok * x Xe o ¥ ee RR EK HEH 
‘ *YES eK *NO *NO 5 
: “ * * _ - . 
: ‘ * El * ‘ : i 
i 5 * * x . ‘ 
e e 2 ek e e e 
xX e e e ° 
o*. WLINEE x WLINE X WLINEA X X 
Cl Ms We KR De He a ake ok aK We a he CF ake 2 ae he a ok ak a a We He ae KC Og ae a a a a a he ke We he Meee C5 oe a he a he ho ok 
y°* * * * RESET WORD * * STORE PAUSE * * * 
° aes YES * SET DISABLE * * FOUND AND * *ADDRESS IN ALCB* * SET DISABLE * 
Po ENP ORE EULON aK ewe ee ce eo X¥ STATUS % *POSSIBLE PAUSE *Xecceeeee*® AS DCV WORD * * STATUS % 
*, % xX : bs . FLAGS : % ADDRESS : : : 
*, 2 * ° Hee ae Re he eae he he ah ke ee ake ak HK ee 3 a he ee ae he Re a ae aK eR RE OK fe he Re he he ae hc ae Re ah he ae We REM ae he ah ae he a af i 2K oe a 2K 
*NO ¢ s : ‘ 
° ° e ° Xe Hey e 
e e e e * * e 
e e ° ° * D5 Keae 
° ° ° . * * 6 
x ° e ° KH e 
o%e ° X X START 72 xX 
Dl Ke ° We Me Re 2 ED) De Re ee ke a He Heo a P) De ae ae oh a ae a 2 fe ak ee a 2 ah) 5 2h he ae ie fe 2 a a 
»*DISABLE*. ne; * * MOVE WORD * * * 
-*FLAG ON OR *. YES .  *CHAIN WRITE CCW * ADDRESS AND * *LOAD ADDRESS _OF* 
*. MASTER RCVE .*eeeees  * WITH DISABLE * LENGTH INTO * *FIRST CCW INTO * 
SOW ETCM OFF .* : CW * : WRITE CCW : : THE ALCB CCB : 
ee o ¥ ee Re a 2 ae eK ok tok ake beak ok We Ra ea a a a a oh 2 ae 2 2 oe ee A HK KK 
*NO e e e 
- toe AO < sf . 
oe X* A2 * e e e 
% e e e 
Hk ° e e 
WLINEH ° xX X 
Be Re ah Re ae Eafe ae ate ae ae a a a ke . He RK EF eK KK He i He a E 5 ote ae ok a ak 2 a 
= x * . * * * * 
cf z *SET SLI AND PCI* ° *GET PAUSE COUNT * SET ALCB EXCP * 
Li 22X# FLAGS IN READ # is * FROM ALCB- * * FLAG ON * 
a : o u e 
Ve / . * * 4 * * * * 
Mk e Be Ra he RR a ah ee ae ae ie a he ok s He Re a ae he ak Re he ea 2 2 fe af 2c a We HH Re Re ae a i a oe ak 
A fe eK e e e < 
* . ° e e 
* El * ° ° ° e 
* * ° ° e ° 
KH oXeccccccnaccsccensececcose e ° 
WLINEI x WLINEG xX X 
Me Fe oe ake a Fate te ae af ae a Be a RE De Re ae ek ee We Re he he FF a a ee 2 ok ok Mee aR aK FS oe a ae a ok ek 
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Chart EB. End-of-Block (EOB) Routine 
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Chart FC. End-of-Block and Line Correction Routine 
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Chart EG. Line End Appendage 
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Line End Appendage (Part 2 of 9) 


LERPCHK] 


A2 


STATUS 
Catton) YES 
STATUS 
MODIFICATION 
NO 











B3 BA 
= UNIT CHECK CHANNEL 
QR CONTROL ERROR 
UNIT END 
Se 
NO 
C4 
WITA 
LINE 
D4 
CE, DE 
AND UE BITS 
ON 
E4 


READ- 
RESPONSE-TO- 
POLLING CCW 


‘(TP OP Oly 
NO 


F4 
LCPA 
NO / POINTING TO 
READ-RESPONSE- 










LERPO] 
G4 


SET 'SHOULD- 
NOT-OCCUR' 
BIT IN ERROR 
HALFW ORD 


H4 
READ-~- 
RESPONSE-TO 
ADDRESSING CCW 
(TP OP 02) 


NO 


READ 
OR ENABLE 
CCW 


YES 


XY 


YES 





C5 
BUSY, 
YES ATTENTION YES 
OR STATUS 


MODIFIER 


NO 


D5 

UNIT YES 
CHECK AND CE 

OR DE 


eS ae 


My 


LERPSTAT 
G5 
SAVE CSW AT 
LSAV WITH 
STATUS 
RESTORED FROM 
LSBO & LSBI 


H5 


SET "CONTROL 
UNIT FAILURE" 
BIT IN ERROR 
HALFWORD 


J5 

CALC. UPDATED 
NO ERROR COUNT 

= EOBLC CNTR 

+ RETRY CNTR 

+] 


K5 


ZERO 
EOBLC 
COUNTER 


YY 


QTAM Charts 


211 


Chart EH. 


Cy 


IPA (22 ) 


BI 
SENDING 


YES 


ci7LcrpA 
YES ~~ POINTING 
TO READ-RESPONSE- 
TO-EOB 
CC 
NO 


DI~ CSW 
RESIDUAL NNO 
COUNT = 0 


YES 
NOTSEND 


CLEAR EOBLC 
CNTR AND 
"TRANSMISSION 
ERROR" BIT IN 
ERROR HALFWORD 


Fl 


SET MSG 
CODE FOR 
"NO MSG" 


x THRESHOLD. YES 
SG WITHOUT, 
OPCTL 


BY 


NO 


LERPADD 


YES Hl} 2-BIT 
CNTRS ALL 
ZERO 









Jl 


ADD 2-BIT 
CNTRS TO 
. THRESHOLD 

CNTRS 


LCLEAR 
KI 


ZERO RETRY 
CNTR ,2~BIT 
CNTRS, LERR+I, 
LCAM+1 


212 


ej o : E2 


B2 
WTTA NO 
LINE 


YES 


2 
C2 HALTIO YES 
ISSUED 


ID 
EXCHANGE 
CCW (TP OP 

05) 








UPDATE AND 
CHECK 
THRESHOLD 
COUNTERS 


TOWTTAP 


F2 
IJLQTA+4 


G2 

MOVE X'01' TO 
LERR+1 (RETURN 
CODE 
INDICATING 
THRESHOLD MSG 
‘ONLY) 


YY 


B3 
INTERRUPT 
ON FIRST BRB 
CCW 


YES 


ey 


DOS QTAM Progran Logic Manual 


Line End Appendage (Part 3 of 9) 


IP4AI 
A5 1S 
NEXT CCW A 
TIC 
YES 
NOP 
NO B4ccwW ON \X_NO BS PAUSE 
AUTOPOLL INSERT 
LINE CCW 
YES NO 
C4 
READ 
SET POLL LIST C5 INITIAL 
POINTER TO ADDR 
CHANNEL 
OF-LIST ENTRY 
YES 
ey D5RESIDUAL 
COUNT = 
ORIGINAL 
COUNT 






YES 


E5CC O 


NO 


xy 


NO 


NO 


WV 


CD FLAG ONY Yes 
N INTERRUPTED 


CCW 


NO 


F5 


SUBTRACT 
BSSZ FROM 
REGISTER 3 


GS ENABLE 
CCW 
(TP OP 04) 


YES 


H5 
CLOSEDOWN 
TIME 


NO 


J5 


SET LDFG TO 
INDICATE 
DIAL LINE 
CONNECTED 


KS 
SET POLL LIST 
POINTER TO 
ADDRESS OF 
DUMMY AND- 
OF-LIST ENTRY 


yy 


yy y 


NO 
ay 
YES 
yy 
a 


Chart EI. 









BI“READ 


TWX-ID CCWN.NO 


(TP OP 05) 


Cl “tTwx 
ID EXPECTED = 
D RECEIVED» 


YES 
[P40 
D1 


ADD 8 TO 
REG 2 

TO POINT TO 
NEXT CCW 


NY 


IP4D 
E] 


RESET LCB 
STATUS BYTES 
LSBO & LSBI 
TO ZERO 


IP4V 
Fl 


STORE REG 2 
AT LCPA 


RESTART ADDR 


ERPRETN 


Gl 
WITTA 
LINE 


NO 


YES 


H] 
ISLQTA+8 


J 

ADJUST SAVED 
RETURN ADDR 
(IN QSVC REGS) 
FOR +O 
RETURN 


Kl 
QSVCDISP 


CAUSES RESTART 
FROM CCW 
WHOSE ADDR 

IS IN LCPA 





CHANNEL PROG. 


Line End Appendage (Part 4 of 







IP4J 
A2°READ 


INITIAL. 
CHANNEL 


PROGRAM 







DISC2740 
B2 


SET REGISTER 
2 = ADDRESS 
OF LSCP 


C2 
DIAL LINE 


NO 


NO 


YES 


NO 


D2 
2260 
REMOTE 







E2 


RESTORE CCW 
POINTER BY 

SUBTRACTING 
8 FROM REG 2 







IP4R] 


F2 


YES 
AUTOPOLL 


YNO 


IP4R 
G2 
STEP POLL 
LIST POINTER 


TO NEXT 
ENTRY 


H2 
UNIT 
CHECK 


YES 


NO 


YES 


9) 


RSTAUTOP 
D3 


STEP POINTER 
TO NEXT 
POLL LIST 
ENTRY 


= END YES 
OF POLL 


LIST 


F3 


SET UP TO 
RESTART 
POLLING 


G3 TERMINA 
STATUS = 
NORMAL 
POLLING 


NO 


H3 
STORE 
TERMINAL 
TABLE OFFSET 
AT LTTD AND 
BSTO 


NO 


J3 END 
OF POLLING 
LIST 


YES 







AT LPPT 








SET BUFFER 
STATUS TO 
BYPASS 
HEADER 
ROUTINE. 


J4 


TURN ON 
"MESSAGE NOT 
SENT " BIT IN 
ERROR 
HALFWORD 












K4 - 
SET LOFG TO 
INDICAT 

ADDRESSING 
OR POLLING 
ERROR 


B4 
STORE ADDR B5 
OF DEVICE 
ACCESS FIELD RECEIVING 
IN 2ND CCW 
(AT TLSCP+8) 
C4 C5 
SAVE POLL TURN ON 
syd "LINE FREE" 
POINTER BIT IN LDFG 
AT LPPT 
IPANA 
D5 
D4 LINE- \_ 
NO ZERO 
REE" BIT ON | 
ae REGISTER 3 
? YES (01) 
IP4P [PAM 
— EA = £5 
MOVE X'FF! TO SET RESIDUAL 
LCAM+I TO COUNTS IN 
BYPASS CSW AND CCB 
TRANSMISSION EQUAL TO 
COUNT REG 3 
FA F5 
TURN ON STORE CCW 
CLEAN-UP POINTER (REG 2) 
BIT IN LSTA (4) AT LAST 
IP4Q 
GA 
G5“LCPAN. 
SAVE POLL 
LIST 7 POINTING TOX_YES 
POINTER READ=RESPONSE-TO 


-EOB CCW” 







H5 





SET REGISTER 
3 = LEOB 
(EOB OFFSET) 


OTAM Charts 


Chart EJ. Line End Appendage (Part 5 of 9) 


















































LAST A5 
A2 AS CC OMENT RETURN TO 
STPLNSND “a 
T N WITH STATUS = CE ALLING ROUTINE 
NXNAND DE 
YES 
IP4B 
STPLNRCV 
SUBTRACT | / DIAL 
CSW RESIDUAL B3 SENDING. No B4’LINE AND 
COUNT FROM <AND RESIDUAL INTERRUPTED 
REGISTER 3 COUNT = § CCWNOTA 
DISABLE 
YES 
IPSEND elas 
Cl 
BYPASS ~ CALCULATE C41 CBS \. 
Cc ; C5iSENDING 
TRANSMISSION . YES UNIT Ls ADDRES 2 OF FIRST SUBTASK\, NO UNIT SCEEPION 
COUNT DELAY ECB > 
(LCAM+I = X'FE) SHEE FOR DEST A SEND OR RCVE OR TWX 
+{ = ' 1 * ‘N 
SMI GEL SCHEDULER 
NO 
4 INTER 
UPDATE AND D4 
CHECK D2 TERMINAL DEST. SENDING 
TERMINAL A 
THRESHOLD watt LRC << 2740 <&no TERMINAL 
HECKING INTERCEPTED 
ER 
COUNTERS Sen aee MODEL 2 
YES (12) YES 
et NOCOUNT STPLNDIS 
eT E2 E4 
SET CCW POINTER MOVE X'E0' TO 
RESET (REG 2) TO ae Sct aN YES LERR+1 TO 
LCAM+| ADDRESS OF DELAY 0 INDICATE 
TO ZERO READ-RESPONSE- STOPLINE 
ey) TO-EOB CCW DISABLE ISSUED 
NO 
IP4Z 
FI F3 F4 
STORE 527 CSW SET FLAG 
REGISTER 3 RESIDUAL \. NO TO INDICATE TURN OFF 
AT BSSZ COUNT DELAY ECB ON HIO FLAG 
(SEGMENT =0 TIME DELAY IN LDFG 
EV) SIZE - 8) QUEUE 
IP4Z1 G3 
Gl se G2 ee PLACE BUFFER 
SENDIN ON READY Q 
: REMOTE "POSTED" TO 
OR EOB wy LPS QCB 
CoN <e 
P4 
HI i H2 H3 
STPLNRCV —_EJF5 RESTORE CCW DISABLE SEND 
POINTER (REG 2) SCHEDULER 
BAL TO TO ADDRESS OF (X'80' IN DASD 
STPLNRCV INTERRUPTED DEST QCB 
CCW PRIORITY FIELD) 
JI J2 


STPLNSND = EJA2 





SET REGISTER J3 
2 = ADDRESS 
BAL TO JJLQIPCK 
OF INTERIM STPLNSND 
LPS QCB 
K2 
Kl SET REGISTER 
QSVCPOST 2 = ADDRESS 
OF LPS 
QcB 


214 DOS QTAM Program Logic Manual 


+ 


RecN 


















































Chart EK. Line End Appendage (Part 6 of 9) 
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“OR CHAINING’ APPROPRIATE CE.DE ONLY 2 = ADDR OF 
CH MSG i FAILING CCW 
NO 
Bo TILQTA+I6 
BI B4 
UNIT NO WTTA WORLD TRADE 
EXCEPTION LINE LINE 
ey) APPENDAGE 
~ © 
LSTSNO LCTLPERM LCTLINT 
Cl C2 €3 C4 
SET MSG TURN ON MOVE X'DF! TO 
CODE FOR "SHOULD NOT LERR+1 TO ne a RETURN 
"UNIT OCCUR" BIT INDICATE FROM IJLQTA 
TO LCPA NORMAL) 
EXCEPTION IN ERROR INITIAL (RESTART ADDR) 
MSG" HALFWORD SELECTION ERROR 
NEXT 
INSTR 
+4 
D2 D4 D5 
D1” LCPA SET MSG aoe cane ‘ UPDATE AND 
POINTING TO CODE FOR IN REG 10 = CHECK 
READ-RESPONSE- "SHOULD NOT EOBLC CNTR THRESHOLD 
, +RETRY CNTR+ 
NO 
LSTUNEX 
E2 E5 
El STORE UPDATED ERP 
WRITE YES ERROR COUNT IN CONTROL. YES Las tale cate 
CCW (REG 10) AT (X'FO'BITS IN X'FO! BITS 
va RETRY LERR+) IN LFLAG 
a COUNTER 
ee | NO NO ar) 
F4 
2701 
FI” READ- F2 F3 ey 
_/RESPONSE-TOX NO 8383 OR NNO rapaeprere Bh ZERO 
ADDRESSING CCW HSA CNR EOBLC 
‘(TP OP 02)” CNTR = 3 COUNTER 
ves (@) 
LERPNI LSTBREAK LSTSKIP LSENCK 
Gl G2 G3- 
TURN OFF MOVE X'FI' TO MOVE X'F4' G4INITIAL G5 NG 
CONTROL UNIT LERR+] TO TO LERR+I TO ELECTION ERROR YES COMMAND 
FAILURE" BIT INDICATE ERP- INDICATE ERP- (LERR+I REJECT 
IN ERROR IN-CONTROL, IN-CONTROL = X'OF') 
HALFWORD WRITE BREAK & READ SKIP 
NO YES By 
H2 H3 H5 
HY GET ADDR GET ADDR H4 SEE MESSAGE 
YES OF READ YES CODE FOR 
2740 OF WRITE EQUIPMENT "COMMAND 
BREAK CCW SKIP CCW CHECK REJECT" 
IN REG 2 IN REG 2 MESSAGE 
NO oy NO 
_~ LTOCKCNT LSENCNT 
J J5 
STORE UPDATE 2 AN STORE UPDATED 
ERROR COUNT RETRY YES J4 SENSE NO ERROR COUNT 
(REG tO) AT COUNT Cais EXCEPT (REG IO) AT 
RETRY 2s COMMAND RETRY 
COUNTER REJECT COUNTER 
NO YES 
LIRRETRY LTOSWT 
K2 K3 TO INDIVIDUAL ERP 
SET "TIMEOUT: ROUTINES FOR THE K5 
aber ; EXCEEDED" DIFFERENT ERROR eaere - ye 
AT LCPA BIT IN ERROR TYPES. 
HALFWORD SEE DECISION TABLES 


IN TEXT OF PLM. 


YES ey 


yy yy 


y 
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Chart EL. Line End Appendage (Part 7 of 9) 


LNRDSKIP 































A3 
A2“RTN 
FROM ERP \_YES ae 
WRITE BREAK X'01' TGs ZEROS 
G NIN LERR+17 
LNBRAN 
i x LNBKOK2 
SAVE SENSE RESET Ba‘ sTATUS Gk B4 TEXT 
BYTE FROM LERR+ = CE AND TRANSFER CCW 
ERP CCW TO ZEROS DE (03) 
AT LSEN+I 
YES 
LNOTXT 
Cl 
D-~ 
RESTORE SENSE C3'sTATUS C4 RETRY ret 
YES NOY INITIAL OR 
FOR ORIGINAL NOY CE,DE AND COUNTER Waren 
CCW FROM UE = 3 CH. PROG 
LCAM+1 ; ; 
‘YES 
- LNBKOK od 
SOLeEoR SET MESSAGE ves ~ >> RETRY 
; CODE FOR COUNTER 
"ERROR IN ERP "NO MESSAGE" =3 
MESSAGE 
NO 
) ES 
' | ey) SET REGISTER: 
RETURN No | 3 =A (LSCP) 
FROM DIAG TO RESTART 
W/R aN WITH FIRST 
LERR+1 CCW 
Y 





INTERRUPTED 


GU status 


H] 


SET "CONTROL | 








1ST 


















3RD 
(DIAG. READ) 


2ND 
(DIAG WRITE) 







LNREAD LNTEST 


(ENABLE) 
SET "CONTROL 
UNIT FAILURE" 
BIT IN ERROR 

HALFWORD 












OR IISA 


CE AND ADAPTER 


DE 


= CE,DE AND 
UE 







H5 
SET REGISTER 3 







SET "CONTROL 






UNIT FAILURE" . = A (LSCP+8) TO 
RE". 
BIT IN ERROR < ee RESTART WITH 
HALFWORD DIAGNOSTIC 
HALFWORD ee 
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LNENAB 4 
SET REGISTER 
3 =A (LSCP+24) 
TO RESTART 
WITH ENABLE 







LNRESTR LNEXFC 
< K3 K5 
RESTORE CSW RESTORE 
DATA AT LSAV FAILING CCW STORE RESTART 
FROM LSCP FROM LSCP | ADDRESS (REG 3) 
+40 +32 AT LCPA 


ey 
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(DISABLE) 
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Chart EM. Line End Appendage (Part 8 of 9) 





Y 


LNSKIP 
YES a! STATUS 
NOT CE,DE,UC 


OR UE w) 
NO 

















LSENPOST 
BS 
Bl ~ Epp SET "CONTROL 
lef SENSE =CRJ, UNIT FAILURE" 
~ EQ, CHK OVERRUN, BIT IN ERROR 
OR BUS E HALFWORD 
[XY J 
NO | 
LERPNOR 
C2 C5 
Cl ~ esw SET REGISTER SET TIMEQUT 
RESIDUAL NO 3 = ADDRESS OF BIT IN LSEN 
COUNT =0 LSCP TO RESTART TO STOP RETRIES 
WITH FIRST CCW ‘BY EOBLC RTN 
YES 
LNSNO 
DI pb5————___—— 
D2“DIAL D4 ee 
SET "SHOULD ERP ZERO 
NOT OCCUR" <n COIN NE (SEN EOBLC 
BIT IN ERROR Romeo = TIMEOUT OR INT. COUNTER 
A RD REQ. 
ich ENABLE) ‘“ a 
NO NO 
EI LRDCNT J LERPSWT 
SET MESSAGE E2 = 
CODE FOR RETRY NO TEXT NO DIAL NO 
"SHOULD NOT COUNT = 3 TRANSFER CCW FINE 
a OCCUR" TP OP 03 
fy MESSAGE 
ee YES is) YES 
LERPDIS 
LRDTXT LRDCKTXT © F5 
F2 AS 25. 
ey TEXT yes YES TEXT SAVE SENSE 
TRANSFER CCW TRANSFER CCW BYTES (LSEN) 
TP OP 03 TP OP 03 AT LERC 
NO 
G4 i G5 
SET TIMEOUT SET REGISTER X 'F8' IN 
BIT IN LSEN 3 = ADDRESS OF LERR+1] TO 
TO STOP RETRIES LSCPH16 TO INDICATE ERP 
BY EOBLC RTN RESTART WITH EM IN CONTROL 
THIRD CCW H5 AND DISABLE 
DISABLE 


H5 


GET ADDRESS 
OF DISABLE 
CCW IN 
REGISTER 2 





SET MESSAGE 
CODE FOR 
“NO MESSAGE" 


J3 


MOVE RETRY 
COUNTER INTO 
EOBLC 
COUNTER 


ey 
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Chart EN. 


Line End Appendage (Part 9 of 9) 


















By 



















LCTLCK LPODISB 
A2 A3 
RESET CSW SET LDFG 
STATUS TO TO INDICATE 
Gy ‘ NEEDED 
Bl B3 
SET MESSAGE B2RETUR wie RESTORE 
CODE FOR ee aie SENSE BYTE 
"CHANNEL DATA DISABLED 0 ; (LSEN) FROM 
CHECK" MESSAGE IN LERR+) LERC 
NO 
C2 
Cl 
CHANNEL. YES ese C3 STATUS \ yes 
DATA FAILING COW = CE AND DE 
ey) CHECK AT LCAM+1 
LSENEQU 
Di D3 
D2 RETN 
SET MESSAGE ‘ 
CODE FOR FROM DIAGN NO cient 
"EQUIPMENT W/R (X'02' IN BIT IN ERROR 
CODE" MSGE LERR+) 
HALFWORD 
Ne tart LPOENER 
E2 E3 
El SET SET REGISTER 
EQUIPMENT "TRANSMISSION Se enece 
CHECK ERROR" BIT IN 
ERROR OF FAILING 
HALFWORD ccw 
FI F2 F3 
SET "SHOULD SAVE CSW AT RESTORE 
NOT OCCUR" LSAV WITH STATUS STATUS BYTES 
BIT IN ERROR RESTORED FROM LSBO & LSB] 
HALFWORD LSBO & LSBI FROM LSAV+4 
Pee LERPPOST 
Gl G2 
SET MESSAGE G3 
CODE FOR BUILD A MESSAGE NO 
SHOULD NOT SENSE CCW REQUIRED 
OCCUR" IN LERC 
MESSAGE 
g H2 
SET REGISTER JH8 
MESSAGE 


2 = ADDRESS 


OF LERC uy OPCTL 


ey 


TO BE SENT BY. 


NO 


LERPMSG 
J3 


RESET 
LCAM+1 
TO ZEROS 


K3 
IJLQMW 
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* 


A4 
IJLQEP+4 


RTNFMW 


B4° RIN 


AFTER ONL 
A THRESHOLD 
MESSAG 


YES 


LTCLEAR 
CA 


SET MESSAGE 
CODE FOR 


“NO MESSAGE" 


LERPTEX 
D4 


SET REGISTER | 


* ENTRY FROM 
IJLQMW 


BS 


SET UNIT CHK 
BIT IN LSBO 

TO PREVENT 
RESTARTING I/O 


NO 


3 = CCW COUNT 


+14-RESIDUAL 
COUNT 


E4° RTN 


AFTER ONLY 
<a tizestotp 
ESSAG 


NO 


F4 

SET X'FF' IN 
LCAM+1 TO 
BYPASS 


TRANSMISSION 


COUNTING 


G4 


CLEAR RETRY 
COUNTER AND 
LERR+1 


H4 
WTTA 
LINE 


YES 


J4 LFLAG 
BITS X'FO! 
ON 


YES: 


LERP12A 


K4 


RESET LFLAG 
AND LCAM+1 
TO ZERO 


YES 


Ry 


NO HS TEXT No 
TRANSFER > 


CCW 


YES ay) 


Ly 


IJILQTA+12 


NO J 


K5 
IJLQTA+4 


— 


Chart ER. 








Error Message Routine 










A3 
ERRMSG 
1S 
BS THIS ANN Ves 
ERROR 
MESSAGE 
NO 
3 IS 
“ ERROR NO 
MASK 
ZERO 
3 
RECALL 
RECALL 
HEADER 
E2 
LEAVE SCAN £3° HDR 
POINTER YES TO BE NO 
POINTING TO INCLUDED 
END OF HDR 
F2~ Is 
ERROR 
BAD SEQIN 
NUMBER 
G2" |S 
DOLLAR 
SIGN 
FOUND 
H2 
INSERT 
CORRECT 
NUMBER AND 
RESUME 
J2 1S 
SECOND 
DOLLAR SIGN 
FOUND 
K2 K3 
INSERT 
INCORRECT RESET SCAN 
SEQUENCE POINTER 
NUMBER 












C4 
ANY NO 


DESIGNATED 
ERRORS 


YES 


E4 


SET SCAN 
POINTER TO 
END OF HDR 
PREFIX 






F4 


SKIP POINTER 
PASTIDLE 
CHARACTERS 

FOR TIME AND 
DATE STAMP 











G4 


GET START OF 
ERROR TEXT IN 
BFR USING SCAN 
POINTER 














H4 


COMPUTE 
SPACE LEFT 
IN BUFFER 


4 
SPACE 
FOR ERROR 

TEXT 


K4 


MOVE ERROR 
TEXT INTO 
BUFFER 


C5 
RETURN 






















F5 
MOVE ERROR 
TEXT INTO 
BUFFER AND 
TRUNCATE 

EXCESS 


COMPUTE 
MESSAGE 
SIZE AND 
STORE IN 
PREPIX 


H5 
INDICATE 
SINGLE 
SEGMENT 
MESSAGE IN 
PREFIX 


J5 


GET THE 
ADDRESS OF 
THE LOOKOUT 
ROUTINE 


K5 
EXIT TO 
LOOKOUT 


OTAM Charts 








219 





Chart EX. Expand Header Routine 


TJLOEX 
EREKALKKERER EEE 
* * 
* EXP AND * 
* * 
KEEKK EE ESKER EER 


K 
* 


o* 
NO .* P 
eoeet,. PUT 

*. BLANK  .* 


Me eb 8 ee 


eet oLr eS 2s RAR BRE RE 
* * * * 


* SHIFT POINTER * * SHIFT * 

* LEFT ONE * 0 eX* CHARACTERS TO * 

* CHARACTER * * tXPAND HEADER * 

* POSITION * * * 
SEEKKEKKEKKERE 


eeKKEEK KEEREKEKKEEKEKEEE 


eeewceceeeX 


Mee te ee ED 


Me 8s 8 08 8 


KEKHK/) LEK EKKEKEKS 
* 


* 
*COMPUTE AUDDRESS* 
* QF FIRST ¥ 


HR ROR [3 eR OK OK 
k * 


* COMPUTE * 
* ADDRESS OF * 


* CHARACTER TO * © START OF FIELD © 
* SHIFT * e * * 
CHOKE EERE REE EEE 3 weertrTT et eter St tt. 
x : x 
AOR RE | OR eae tk WT o TTI SLi rte ls T. 
* * ‘ * 
*COMPUTE NUMBER * 5 * INSERT BLANK * 
* OF CHARACTERS * 7 AS LEFT * 
* 10 SHIFT * ‘ * DLLIMITER OF * 
* * ‘ FIELD x 
REKKEKKKKKEKKEEKEK ‘ KK REE EEK KEE K 
x : i 
os e xX 
Fl ba é BR KMKEKE SKE KR KEK EK HK 
‘s . e GET * 
-* = SPACE *. YES : * SCAN PUINTER * 
*. FUR SHIFT eM eie alo ote) 6 e066 6 we 6 0)! 820 8.6 oe eleiereelete e6 * FUR NEXT ¥ 
xe LEFT o% * DESTINATION * 
*. .* x CuvE * 
*e, 4% RARE RK HEE KKK HK 
* Nu A 
is X .*. 
x BOI ICIOR (30 IRIE te i te G4 
CKEKG | RRKE RE ERK x * . *. 
* * * SHIFT POINTER * + *. NO 
* RETURN * * LEFT SIZE OF seeeeeeeX#sEOA BEEN DONE. ® eee 
* * * NEW FIELD # *, o* Z 
rere rete et ett * * *, -* . 
Perrtere rT ert fa tt *. .# e 
* VES ° 
: : 
tC} se 
: 
EEKEEHGEREHERERER 
« *« : 
* RESTORE #* § 
* STORED SCAN # 
* POINTER oo 
TT itt i tier tit t) ae 
° a 
x : 
err ayer et Tt ttt : 
* * °° 
‘ RETURN Xe: 
PT TTTT TTT TTT TTT 
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Chart FL. DTF Locator Routine 





TJLQGA 
KEK AZCRREREEEE 
aGET DTF ADDRESS ¢ 
CORRE EER EEE EER 


wWReee eee 


KKKKKHZReKEEKKKEEK 
ak * 
* SAVE * 
*KRFEGISTERS ber kee 
* 


* * 
REESE REKEREER 


X 
SORE 3 oO ee ee 
* * 
* GET * 
« LAST DTF * 
x ADDRESS * 
* * 
werTTtTetrtt TTT Tt 
Be ele bah hae 
: ; 
4 03° &, CKEREDGEEREERE EEE 
7 * *, * PUT DTF * 
° e* DTF NAME *. YES * ADORESS IN * 
° *®.IS REQUESTED .®. cc ee ee eX*¥REGISTER 1 AND *® 
‘ e, ONE * * O IN REGISTR * 
E *. o* * 15 
: Oe TET eTT TTT tT ttt ts 
e * NO Py 
; x ; 
. eT TTI ert T TT TTT TT : 
‘ * * e 
s * GET * ‘6 
e * PRECEDING OTF * ° 
7 . ADDRESS * e 
¢ rere rr Tse Te Te Te 7 
gia : 
Fu : o*, : 
i HN gf e F3 *, e 
ee : .* a 
ecoae Xe TYPE EQUALS o* e 
x, LG o* e 
*, o* ~ 
*, * e 
* NO . 
x : 
ERG 3 OR EE EK K : 
* * : 
* PuT * « 
* X*20 IN * ° 
: REGISTER 15 * ° 
x a 
STTTitrreTTeTr yy. 
aN bera@achiow le atateubeaxaetee 


x 
KR RAK ZEKE KEK 
* 


* 
* RESTORE * 
POECISTERS 0-12 - 


* * 
REE ERK EEKEKEE 


we ea 8 eo eo 


KRESS ERE REE EE 
* * 
* RETURN * 
* * 

HERR E ERE 
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Chart GA. 


TJLQGA 


NOE 


22 


He He HK AL] ie he ok a oe he a He ak 
* * 
* GET * 
* * 

Ae he ae he aR he fe he he ae ee a oe 


“eee eee 


eR Re ate ok Be he ake fe a ke ok ie ok 
*SAVE REGISTERS * 
* IN THE USER'S * 
* AREA AND GET * 
* DTF ADDRESS : 

* 


* 
FOR IIR ROR ROR ak a 
x 
Xe 
Cl x, 
ox *, 
o* IS OTF *. NO 
x, OPENED eXccscccccccccsecceoces 
xe o* s 
*, * * 
*xYES e 
RRGA x X 
oR A RK De ko a RROD DR te 
* x x * 
*GET MS-PROCESS * *SET USER ERROR * 
* QUEUE ADDRESS *X.-.. * FLAG IN * 
* * ° * REGISTER 15 * 
* * é x * 
Me RR RC a a a a a ps 2 RR tok gk i ke ka ak 
‘ es a 
. * * e 
e * Dl * ° 
° * * e 
e KK ‘ 
x ° 
o%X. e 
El *. X 
o* * HE Dk ek oe Rk dK 
o* 1S *. YES * RETURN TO 
*. THERE AN o*eeee CALLER 
e ELEMENT . ° 
Ke. .* ‘ oR ROR ok dog tok ak ak 
*. 6% xX 
*NO % HK 
. * * 
° * E4 * 
: * * 
. AK 
x 
We RRO Ea a a a a 
* * 
** GET FLUSHAD * 
* EXIT ADDRESS * 
* * 
* x 
SOR Rg a dk ek ak ak ak ak 
xX 
o%*e GALEXTO4 
G1 * HR RG De ea a a ak ak a ok 
o* x, x * 
«* MASTER *. YES * RESTORE * 
*. RCVE SWITCH o*eeece eee X* REGISTER FROM * 
*. OFF o%® * SAVE AREA * 
ee 4 ¥ sk ok dota kak tok 
*NO ° 
x ° 
eX. xX 
Hl x, HH 2 oe dk kk 
o* ‘ * * 
e SYNCAD - N *** FLU SHAD X# ¥% 
*. SPECIFIED e*eeee * GO TO USER * 
e ° ° *EXIT ROUTINE * 
*. 7% e * * 
x, 4 x RR Re a Ro a 
*YES eK 
- * * 
° * E4 * 
: * * 
a HR 
x 
$0 J kok kok tok 
*xe SYNCAD EHX 


* GO TO USER * 
* SYNCHRONOUS * 
* ROUTINE * 


Fe Re HR Re ee a ak ae 
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Get Audio Message Routine 


ACK 
* * 
* AZ * 
* 
Ke 
GALSRHLN xX 
he abe a te Ae a aK 
*MOVE AUDIO LINE* 
* NAME INTO. * 
* USER'S AREA * 
: (LINAD) : 
Re ee a afc ae Ge ae oe ake ae oe ade ah ae ae 
X 
o*. GA1LOVAI12 .*. 
B3 *. B4 Ke 
«* INPUT *. 3% 
«* SIZE GT *. YES e* OVERFLOW *. 
, WORK AREA eK ccacccce ° EXIT o 
*. SIZE ° *. SPECIFIED.* 
Ke 7% *. o* 
ee o * Ke, * 
*NO *YES 
X xX 
He Re RR CF i he a he ae he HRC Ge ie ae aK a KK 
x KXKEKOYVADKKK & 


* 
*MOVE INPUT SIZE* 
x INTO GET/PUT * 


* GO TO USER * 
* OVERFLOW * 


* PREFIX # * ROUTINE # 
Re RE he ee a Re he i i 2 aE He Re ee he he he ae 2 
: eM itemewce 
GALMVT1O—X GAIRES14___ X 
He HR AH PB HK He HK Ke he he He HC RR aK 2 2 ae a he ak a he 2 OK 
* * * * 
* GET INPUT * *MOVE WORK AREA * 
XBUFFER ADDRESS *Xeeceeeee* SIZE INTO. * 
* * *GET/PUT PREFIX + 
HR Re Re he he He Re Me he hc ee ae He Re he 2 ee he Re ae ae ae he hc he hie ae 3 
a ok 4K 
: * * 
i a a ee 
; * x8 
m Heck : 
x GA1GALO7__ xX 
He HR Ke EF a he oe ae eo HK E GH HK KK KK 
* * * * 
*MOVE INPUT DATA* $I QWAT Tx 
* IN WORK AREA * * WAIT FOR NEXT * 
* * * ELEMENT + 
HM HR he he he he he ee a eo Me he He he a AK he ee 
x x 
A He He he EF he ie oh ee eae te eR ae ee Ey he ae ae 2 he he he 2h a ke 
* SAVE ALCB. * * * 
* ADDRESS INTO * *GET QTAM READY * 
* GET AUDIO. * * QUEUE ADDRESS * 
x ELEMENT * x * 
1 * * x 
RR he eo Ree eg te i Rc oe He Me ae He eK he KK he 2 OK 3 hc oe 
x x 
30K 6 3 yk kok tok 4K G Gk ak 
HA QPOS TH ke sR QWAT Te 
* POST GET * * REMOVE MS * 
* AUDIO ECB TO * * PROCESS QUEUE * 
*GET AUDIO OCB * FROM READY 
* x QUEUE 
eee eS ee tees Perre re Ss Err 
x 
° eX. 
x H4 *. 
eR a HS Re tk tee ee * 
* RETURN TO THE * -* IS ITA *. 
x CALLER x *e CLOSE ik 
x * *. ELEMENT . 
FR Ae Ree ae hk Re ae he ae he x, ‘‘ 
Ke * 
*YES 
x 
HOR Gk 
* * 
HK KK QPOS TK 
week RELEASE * 
ee CLOSE * 
3 * ELEMENT * 
xX WK ae He eh ae Ie Ie HK 
KKK 
* * 
* D1 * 
* * 
KH KK 


Manual 


KEKK AS REEAKAKAK 
* ENTRY FROM * 
ba SUPERVISOR : 


We He a KK HK KK KK 


Meee eee 


AEB 5 2okoR dio tok 
* GET ALCB 
* ADDRESS FROM 
* GET AUDIO 
: ELEMENT 


eH a he a ak eK 


Ft Ht Ht Ht 


<e ee ee 


fete C5 tak tok tok tok 
* 


* 
*SET ALCB GET IN* 
SPROCESS FLAG ON* 


* * 
We Ae He eK i he 2 a a 2K 


<0 ee eG oe 


HHKKKYS RAK KH KH HH 
* EXIT TO * 
* — QSVCDISP * 

Re He ae He Me he he he 3h oe aK I Ke 








Chart GB. 
We RRC A) Re oh he he ak he 
* 
: (JLQGB 
We eR a ok i 2 aK a a ae 
x 


Rem B actor ak tag teak 
*SAVE REGISTERS 
*IN USER*S SAVE 
--X* AREA AND GET 
« ™* OTF ADDRESS 


* 

MESES ST ote See | 
tek Ok : 

* * 

* Bl * 

* * 
4k OK 


2 
oO 
m 
rs) 
2) 
o 
® 
“nce 
e 


oOxzmmn 
OmMZN woe 2 oe 


% 
r 
+ VO 
*Oxp Tn 
*# CMa we 


* 
° 
e 
TT 2M tee ove 
e 


nN<PPp 


GBIEXTO4 =x 
A YD a oe oe oe 2 
#4 F LUSHAD REX 
* GO TO USER 
* EXIT ROUTINE 


* * 
Wee Re ee a ak 


eeeseee#esess#seesnsteeteseeses @ 


PT ORL LLL: 
#42 SYNCADE #4 
* GO TO 
* SYNCHRONOUS 
* ROUT 


* 
We Re ae ae ae ae a a 


x 
* 
* 


a 
* 
* 


* 
x 
x 
* 


* 
x 
* 


* 
* 
* 


2 
oO 


eoeoeeeeee ee ee Mee oeeeoeeeweeee eee esereeseoeseeoeveneeseeeresenees 


GB1GBFO7? 
3 Re AND he he a ok eo eo 
x 
* ET 
* 
* 


DTF AND 
WORK AREA 
ADDRESSES 


eRe a eke oR ae a a ok 


G 
0 eX 


HHHHH 


eR RC De Re ea eK 
* * 


* GET WORK AREA * 
*SIZE AND START * 
A MESSAGE ADDRESS® 


We RR Re a ea a ee a he oe 


X 
* 
S 
oO 
I 
E 


HEX 
* * 
* E2 *e. 
* * 

OK 


GB1SEGO8 
KE 23k tok tok ok ok 


* 
*GET ADDRESS OF * 
*PREVIQUS BUPEERS 


Meee ee H 


+ 


eH 


* 
SOR RRO BO Ra RO ROK 


eee ee 


RG Do aa ak a ak 
ERK OP OS TRH 

* RETURN LAST * 

* BUFFER TO * 
*RE TURN BUFFER* 


UEU 
 ebEst ceuiES 


ee eee 


ROR CRCECRH Dak ak dak ake ok ok 
* 


* 
* INDICATE NO * 
*BUFFER PRESENT * 
% * 
* 
* 


* 
He He He Heke oe a ae ok eK 


bape tthe dade 
* RES TORE * 
ZREGISTERS FROM . 


USER'S SAVE 
* AREA 


* *x 
eM I A Bek ea ok ae ke ee 
e 
e 


X 
HK IK 


KH 


GBl 


eceeeX 


GBl 


GBl 


+ 
* 


* 


GALO9 
Ok A OR ak tok 


mek to QW A [Tae 
*WAIT FOR THE * 
* NEXT ELEMENT 


* * 
RR RRO RCR RRO 


B3 e. 
* 


we ES IT 
*. AN ALCB 


*. .* 


ox 
*NO 


Me ep ee 8 


Bok RoR C 3k ko kok ok 
* SET BUFFER * 
* PRESENT AND * 
*FIRST BUFFER OF* 
* MESSAGE * 


x 
ae He he he a Re Rohe ee he he ea ec 


<e ee oe 


ok tok D 3 ede keke dog ak 
* * 
*SET AUDIO FLAG * 
*AND USER SWITCH* 
: (SWITCH) OFF : 
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Chart LB. Line Appendage PCI and Program Check Module 
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* ADDRESS be 


* * 
eRe eK eae a he he he eo 


Ke eo ee 


RRC 2k RR a gk 
* GET INPUT * 
*BUFFER ADDRESS * 
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% ADDRESS * 


* b 9 
eR a hk eke ee ok ok 
X 
He KKK G DK RH a KK 
* MOVE IN LOG * 
*AREA CONVERTED * 
* AND UNPACKED * 
* INPUT MESSAGE * 

LENGTH x 

Ie Bee oh ae he he oe ak a 
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o*. 
B3 *, RB, Go ak ok aa 
o* e * GETIME * 
o% « YES Ka KK K— KK HK 
*e LOGTIME oXrccccseeX* GET EXACT * 
%e 7% * TIME OF * 
*e * x A * 
*. 4k He Ra a ake ae a ok 
*NO e 
: x 
. We eh RC Ge ao a ao ak ok 
. * * 
. * MOVE THE TIME * 
‘. * INTO THE LOG #* 
s * AREA % 
é * * 
° He af Re ae a a a ae ae ae a ak a ak ae ak 
x x 
eK HK DB kak a ke ak ae oe ak ok He Re Le a ae he ae he he ae ae ae 
* * * oc 
RESTORE * * RESTORE LOG * 
REGISTER 1 


He Ht Ht Ht 


Meenrteeee 


Ehetenne ee CARED ADDRESS IN* 


* 
Re ek ke Re te a 


He he ok EF eR eo i ok oe 
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* 
x 
* 


eR RR RO ok kok 
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Lookup Terminal Table Entry Routine 


TJLQLK 


REREAD KEKE KKH 
* * 
* LOGKUP * 
4 * 

Re he eK ee he ae a mK a 

x 

He Rm a EE 
* GET MAX * 
* SIZE UF * 
* TERMNAME FROM * 
* TERM TABLE * 
x 

BRR KEK KEE 


RRR KC OK EK KKK 
% * 


+ TURN * 
*UFF EUB STATUS * 
* BIT * 


* * 
EEK ERR EE KK 


oXe cc ccc cc ccreccc cr eccccrcvecercesreasaceceeeceeeseococe 
X « NO 
o¥*, o*. 
D2 x, RR KEK) FE KKK KE N4 *. 
o% TST x, * * * e 
o* ERSTOENKT) *. NO * COMPUTE * .* *. 
*. TERM TABLE .¥*eeeeeee oe X*® NEXT ENTRY Ke wccceeeX#e EN) OF TABLE .* 
*.ENTRY FORL® * ADDRESS * *. ° 
*.OEST .* * * *. o* 
*,  * ERE EERE EE KEKE Kee 
* YES * YES 
eXeescccccces « 
x ° x 
RRR KE DKK KE RE KK e ESE’ GEECKERSERKER 
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* MOVE * ° * SET * 
* QUEUE ADDR TO * . * OULSTINATION * 
* LCi * ° * ERROR BIT IN *® 
* * e * LCB * 
ME MK . ERKCESCEEKKEREEEEE 
x ° x 
KR KE DEREK EK KKK a SEKEE LERKEEKEEEE 
* PUT * . * ASSIGN * 
* TERM TABLE * . * MESSAGE TO * 
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* * * QUEUE * 
Me Me Ree eo a a KEKE CHEK KEKEKEEKERES 
X 
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&* * 
* RETURN * 
* * 
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Chart LO. IBM 
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CAIN, CUE 
STAT. MOD OR 
DE 
NO 
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DATA CHECK YES CHANNEL 
Seon Ge DATA CHECK 
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NO 
C2 
SET TRANS ERROR m VES 
AND MSG-NOT- UNIT CHECK 
SENT FLAGS IN 
ERROR HF WD 
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(2) re 
PROGRAM \YES 
CHECK 
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- E3 
YES 
1JLQLC PROTECTION 
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NO 
SHDNOT 
F3 
POST SHOULD- 
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ERROR MESSAGE 
CODE IN LCB 
G3 
SET CU FAILURE 
FLAG IN ERROR 
HALFWORD 
H2 
PLACE ADDR IN H3 
saber SENSE LAST YES 
SUPERVISOR COMMAND 
WILL NOT ) 
BYPASS | 
J3 
MOVE BYTES 
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LCB FOR 


MESSAGE WRITER 


PUB BUSY OR YES 
NOP 
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SET RESTART 
ADDR IN CCB 


GETSNS 
C4 


SET UP 
SENSE CCW 


E4 


POST 
PROTECTION CK 
ERROR MESSAGE 
CODE IN LCB 


o 
xy 


G4 
RESIDENT MSG WRT 


PREPARE & POST NO 
ERROR MESSAGE 


TO CONSOLE 
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RESTORE REGS 
FOR +0 RETURN 
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RST CHAN PGM 
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CSW IN LCB 


D5 


SET TRANS ERROR 
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o 
BY 


SET MESSAGE- 
NOT-SENT 
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LCB FOR INPUT ERROR MESSAGE 
- CODE IN LCB 
YES 
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SET CE AND DE 
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SET PC) FLAG 
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es TERM ENTRY 
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SET COMMAND- 
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POSTING CCB 
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SET CE, DEIN 


CSW, TURN OFF COMMAND 











BUSY & DE FLAGS REJECT MESSAGE CODE 
IN PUB IN LCB 
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May BUS OUT 
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RETRY SWITCH 
















WRITE 
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WRITE AT 
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LINE ADDRESS 
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INDICATOR FOR 
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MESSAGE-NOT- 
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RESTART CCW 
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FOR WRITE 
FOR EOBLC 





SET X'70' IN 
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LPS ERROR 
PROCESSING 





POST BUS OUT 


ERROR MESSAGE 
CODE IN LCB 
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FLAG IN ERROR 
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SET UP BUFFER 
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IS CCW 
FOR FIRST 
BUFFER 


INITIALIZE 
PREFIX FOR 
EACH BUFFER 
CONTAINING 
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LINK BUFFERS 
CONTAINING 
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OF READY 
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Chart MC. Conversational Mode Routine 
eeEE cicce 
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a ase * ise 
* & e 6 
* 4 
x x 
IJLOQMC “gett ago 
HeEKA THREES ERE + *CONVRSE*, DOES ee 
*CONVERSATIONAL * e* MODE AND *. NO NO 7 aoe 
* OUTINE® *.ORIG MESSAGE e#cccaveve cect ee QUERE, ity AINS® 
ote SUBROUTN * *. PROCESSED.* xX 
EK OKEERKEEER EEE *. o* keen ee eet 
is *. .* *16 * *16 ® 
* YES * F5* * B1* *e YES 
: x * « *€ ~ 
3 * * * ° 
e e °® 
ry x e 
x .*, x 
PEEKED | REEMA EEE E B3 *, 4H 5SSSSees 
* SET * . * * bd 
Sconeesht ore MBbRBE a geHE® oboST RUST Stats 
* ER A 0 AL * e eeeeevuvde @ 
gabe yon * a ERROR o* “iced mee enpty BFR . 
* * . ° 
eT eT eet *, .# *16 * onersensens. 
Py * NO * F5* e 
: iF * *€ . 
e e * e 
e e e 
° xX ] 
ee o*, x 
Cl *, CEE CPEREREEEEEE 3 *. eeeeacs soneaseses 
o* *, *NORT 1383* o* *, . 
e*FIRST TIME ®. YES 6-4 —-€—K— ¥— F— F-—1~—* ° IS THIS *. NO SINITIALIZE LCB ¢ 
*, aD Hie * eocveeeeX® ENBINSAT : *,. A GeeGE oe @eeovneced * ADDRESS sk ; 
*, U N e e = « 
*. «* ROUTINE * *. o* *ebhe * REPLY + 
*. o* ERE KEREER EERE EE *. ot £16 * Trt titi iti tris t 
* NO ° * YES @ F5* ° 
Py ° ° * € e 
e oe ° * oe 
e e e @ 
eXccrecneercesesewesesecsere e * 
. oe e 
se x @ 
Xx EKEKEDS OREKEREEEE e 
REKK) | KEKKEEEKE * * o 
* RETURN * * SAVE * e 
* TO MACRO * * RETURN * « 
* EXPANSION * *FREGISTERS 14-3 * e 
CEKKEEKEERERERE * * is 
CK AEEREHE EEE EE EEE 3 
i , 
e e 
e e 
e @ 
x ° 
o*, e 
E3 *, a 
e* IS ° e 
-* CLINE . YES : 
*,. RECEIVING e*eccceen eoe e 
*, e* e 
*, .* EeKEKE e 
*. ,* *15 *€ ps 
* NO * A2* e 
- * * 3 
; * . 
e e 
e e 
x e 
ee EKE FORE EKEE ERE : 
* * S 
* TURN LINE #* ‘ 
* ARUUND TO * e 
¢ RECEIVE * ; 
EKER EEE EE EEE EEE : 
‘ ;: 
° e 
e e 
e e 
: e 
eTTerrtTTrrrrey G3. : 
* & a* *, e 
* FEND * YES .* END *. ‘e 
* STAR RT OF KX eccecccce Xe UF POLLING * e 
: PULLING LIST : *. %LIST o* e 
pied iaweeseeweuer or a . 
e * NO e 
e e : 
C) e eo 
° e t 
e x e 
KEKE IER EERE RE . 
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: #INITIALIZE UCB ® é 
eceecceacenceceese eX FOR ACTIVATE Xo eee 0 ae ete ee o's 0.06 a be @.6 0 6:0:0 0 010 66 6 600 66 e066 ee 


; LINE ROUTINE : 
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TIVE BUFFER * 
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Chart MM. Message Mode Interface, Initiate Mode, and Priority Mode 


Routines 
I JLQMM 
SHREK LECH ERE 
* * 
* MODE * 
* * 
SKRKEKEKE KEK ERE 
x IJLQMI LJLOMP 
SHECKER | EECERREKEE 
od * KEKKBGRKEREERERE KEKKA SEER KERERE 
* SAVE" * * INITIATE * * PRIORITY * 
* SCAN POINTER . sHODE SUBROUTINES SMODE SUBROUTINES 
¢ 
* * ERKEKERKEECEEEE Tee reres st + es tf 3 
SHEKKEREKEKEKE REESE ; x 
oan x _& 
CERERL | EEREEE EEE E EKKEECGEREREE EERE CH ee ee 
* SCAN SHAL * * * * SCAN SHAL *® 
*— +— 4-4 * SET € HK K— HK H— KH 
*GET NEXT HEADER* *INITIATE BIT IN#® *GET NEXT HEADER* 
* NON— BL ANK * * LCB * * NON-BLANK * 
* CHARACTER * * * + CHARACTER * 
SRKKEEREEKEEEREESE EKKEKEKEKEEEESEES KEK KEKE KRRERARERE 
i : 
DL *. TT tr PLT TILT TTT x KKEEEDS CR RERRCR RE 
* e * * EKEKDGESSSEKEKRESE * * 
o* MODE *. YES #—k—#—F— FH — HK * * * MOVE * 
*e CHARACTER e#ecccccaeX® LINK TO. * x RETURN * * PRIORITY BYTE * 
*. FOUND .* *SPECIFIED MODE * * * * INTO LCB * 
*. o* * SUBROUTINE * EEKKKEKREKRESKEE * 
*. 4* CERKEEKEERERERESE WEEK EERE EERE EE 
* NO ° e 
x : if 
SRK ERE REE EREEEE ; x 
* * . ER EE SRR RRR EEE 
* RESTORE * . * * 
* SCAN POINTER * e * RETURN * 
* * - * * 
. | * E REESE EEREREE 
CKEEEREEEREREEEER 2 
OR iis ached case enoniies 


°e 
e 


x 
EERE 1S EKEKEREE 
* * 


: RETURN : 
HREREKEEREREERE 
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Message Type Routine 
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Chart MW. Message Writer Initiator Routine 


TT TPC TTS Tt ee kK A 5 IO tok a tk 
* * * * 
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We RA RH KK KK KKH 
X X 
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* * ° -* INFO *. NO * PLACE BUFFER * * INSERT ECB * ° 
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BORIC AD ae toioiok toi Pal area 
x * 

* I JLQ0A * * RECALL * 
* * * * 
FORCE CR CRO a Ce i a ak SR ROR kak kek ak $k fk ak 
X X 
o%*, o*e 
Bl *. 4P* *. 

NO .* OP C * «* BUFFER *. ON 
eeee*. ERR MSG TO .* *. TO BE PUT .*e.e05 
. *. BE SENT .* *. ON DISK .* : 
° x, o* x, o* e 
. x, Lx *, * e 
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e x e e 
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° «* THRESH *. YES Re = == a priate * . 
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e e * * Ld e es 
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. x ° e Ld e 
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xX e e e 
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NO .* PERMANENT *. ° * ERR MSG TABLE * * BUILD FRR * 
eeee*. ERROR ON o* . * CLEAR I/O FRR * * MESSAGE IN * 

. *. LINE ~* . * MSG FLAG * * BUFFER * 
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. Ke . SOR ROR RR a ROt a teak atk AIA RIOR ROI kr ak 
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od e 4 se seeeoenese oe ee Xo 
ae e xX ° ) e e 
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cs Fl x, ‘ BOR CRORE 2 RR ek ok tk 7 FOR BOK E Bak tok 0K ok sak ok 
ae * * *. ° * * . * COMPLETE * 
WE y X NO .* _INTREL *. . * BUILD ERR * . * BUILDING MSG * 
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‘a * *, * KEKKKKEKEKKESKSEE 
*. Ft *, .% 
* YES * YES 
x . 
MEER PKK KKE KKK é 
* * 5 
* MAKE HEADER # : 
* ADDRESS DK aside -ete See oes 6.66 e's 
* AVATLABLE = 
WORE KEKE KEKEKEKE 


ee coe 


AER) OER EERE RE 
* RECALL loB2 * 
kK KK AK 
* * 
* RECALL HEADER *® 
* * 


HERE EKER EKER EKEEKE 


ee eevee 


WAKE E DRE EK SKK 
‘ GO. * 
ve LOOKUP EKA’ 

AR RRR ie goa 
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Chart RS. 


TJLORS 
ERK ALEK ERE 
* * 
* RETRIEVE * 
* * 
KEKKKEKEKEEEEKE 


mMmees eos 6 


#44 86R | HERE EE EE 
*SAVE REGISTERS: * 
: SEQUENCE * 


NUMBER, AND * 
Se URN ADDRESS a 
CHEOEREEE HERES EEEE 


AL IN .* 
T * 


* 
YES 


Mee eco e & 


REKKE!S) | HEREKEKEEE 
* 


+ 

* COMPUTE AND * 
* PUT OFFSET IN * 
WORK AREA 


EEEKKEEKEKEEKEK EEE 


+ & 
ee 


#050 Tm™#Ne eH 
“a2 We 

+ OMOAe 
xT 
joo * 
m— * 

+ 

C2 ee 


eMe 0 6 et Kew Home ee eo st 
% 
* 
+ 
* 


*, 
OF .* 
* 


* RETRIEVE NEXT : 
* RECORD 
ceGae Gas aaeeseees 


toe eo ee 


.* BAD 
*.DASD ADDRESS 2+ 
x 


x 
* 

T *. 

E : 


KL. 
* *, 
.* 1s ®, 
#2 THIS HEADER .® 


*, .* 


o o® 
* NO 


Retrieve by Sequence Number Routine 


EREKAZEREEEEEEE MESS ART EES See ee 
* * * 
* RETR * * SEQCK + 
* * * * 
KEKEEKKEEEEERES EKSKEKKSSEREKRSESE 
e e 
es J 
e 2 
ea * 
x xX 
EEKKEAZRRKKEKERES SSRECHGCSECETE NSS 
*1JLORD RNDA2* * 
= $— *— kK-4— HH H—* : PuT Sa ght * 
* RETRIEVE * ria La re WORK * 
*MESSAGE SEGMENT.* AR * 
% FROM DISK * : * 
REE KKK KE KKK CKKEKKKEKEKESESESRE SE 
e e 
@eovevevneeseeeaeeoeevnee eevee eeeaeee een eeoeseeae ee e 
: : 
0 RRRERC EMER ER HE EE C4 *, SPEND Seeeeeee es 
¥ * * ean ria * 
NO x * RESTURE * * KETURN * LOW .* COMPARE *. EQUAL : SET *CALLER® : 
«sees eek CALLERS Mewcccee X* TO CALLER * eee¥e EQUENCE oe cccce eo X*® EQUAL TO ¢ 
* REGISTERS * * . « NUMBERS . *RETRIEVE*S & 
. * * ERE KR EE EEE KEK . , o* CALLER® * 
| REE EE ERK KH xX o of seeceseesesseness 
KEK CEES * HIGH e 
* * * * e ° 
* C2 * * C2 * e e 
* * * * « x 
KEE KEK = Seng 
X * * 
o¥. * F2 ¢ 
D4 *, * & 
* *. *£OEe 
YFS .*® *. 
eee*. PRIORITY o* 
° « MESSAGE . 
e *,. o* 
x , o* 
CREE * NO 
* * 5 
* C2 * e 
* + ; 
EE * 
x 
HCCKEE GEEREEESEEREE 
* * 
* SET "CALLER® * 
EQUAL TO * 
* "RETRIEVE®S © 
+ CALLER ® * 
KEKCEKEEKEKEKESKEE 
< EEE 
- * * 
oeX* C2 € 
* ¢ 
**e* 
REEL DEAE EEE KEE 
* * 
YES * GET *BAD * 
eee 600 we KE St QUENCE ere 
* NUMBER® ERROR *® ° 
. * CODE * ‘ «ee 
«| KEKE KEKE EEE EEE x * * 
EK KE * F2 & 
* * % * & * 
* FD? * * C2 * eeeE 
* * * * x 
EHX EEK . 
e YES 
e *, 
G5 e. 
s,. 
BAD *,. 
+2 K#2DASO AODRESS o® 
e +. o% 
e *. -* 
e *. Pe 
° * NO 
se @ 
e e 
: x 
> Se 
YES ° * SIGNAL s 
eee - © "NOT ORIGINAL @ 
° e * RECORD® . 
xX ‘ SHERESSKESSKVAESESSS 
KKK e ra 
* * e se 
* £2 * 
* * ; : 
HK ge he e e 
.*, o*, 7 x 
2? ve we? br oro nea ae 6 eceach’ ecaae 
° ° he e RETR ° cK * 
YES 1s *. YES 1s *. NO *- 6-6 —*«-4-K—- ROKK é Sens cbse ees 
hee eee R® SOURCE KEY -e Dee weenes THIS HEADER oF ccc ccee eX® Brcccee * CHECK % 
- CORRECT . ° ° * RETRIEVE NEXT *® *SEQUENCE NUMBER® 
*, o* *. o* * R ORD * * = 
*, % =. .* PHP EKEKEEETERE SECSKESSEREEKSRSE EE 
* NO * YES e 
e ea e 
@eeeeoeoevoenvneneee e088 CMOS R Soe OE MELE HEHE eee rec eeseeressseseneneereecsorreoke 
o*, *, o%, 
K2 *, K3 *, ORE KEREKKEEREE ” *,. 
.* oe o* *, *StQcK RSA4* 
Yes e* CORRECT *. YES o* Is _ IT ane NO 6-6-6 4-#-*£-£—8-—%& YES + ORIGINA L 
eoeceeeeX®e TERMI NAL eFeccvceeeX®, BY SEQU ENC oXecccece xX * CHECK * asicits SECORD NEADER-¢ 
x *. * ° IN ° *SEQUENCE NUMBER® 
- *, * *, * * x ‘ *e. * 
: *. .* * HOCH EREEREKEEEES x #. 0% 
adds * NU * YES ° +eee * NO 
* ; * e e ° * 6d e 
* K2 * e e oe * K2 * e 
* * xX X X * + x 
eR KEKE ERE eRe eats +e 
* * * * * * * * 
* El * * €1 * * €EL *® * El * 
* * * * e * * * 
KEK eeKK KER esse 
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Chart RW. QTAM PIOCS--Activate Routine 


Al 
READ/WRITE: 


ISLQRW 
Bl 
TURN CAN 
REROUTE BITS | 
OFF IN BUFFER 
GET BRB 
ADDRESS FOR 

HIS BUFFER 


Cl 

PUT BUFFER TEXT 
ADDRESS AND 
READ 
COMMAND 
CODE IN BRB 


DI 
IS THIS A YES 
RECEIVE 















COMMAND 
CODE IN BRB, 


; SET BUFFER 
(FI ) STATUS FOR 
NDING 


FI 


IS THIS A 
PAUSE BRB 


NO 


Gl 


SET CD, PCI 
FLAGS IN 
CURRENT BRB 


HI 
IS THIS A LAST se 


SEGMENT 










READ INITIAL 




















A2 
ace IN a os 
: A OR ‘YES 
BUFFER AS aU achED (F3 ) NO WRITE INITIAL 
SPECIFIED IN 
LINE 
LPS 
NO ue ‘YES 
B2 , B3 B5 
ROUTE MESSAGE 
TO ERROR QUEUE GET (FIRST) POINT TO 
TEMPORARILY , (NEXT) POLLING TERMINAL TABLE 
SET UP POLL LIST ENTRY ENTRY 
POINTER REG 
“C2 
C3 C5 
SET FLAGS TO 
FREE UNUSED YES Ast ENTRY YES_ DON'T DIAL 
BUFFER 
D2. D3 
EXIT TO LPS TERMINAL 
CONTROL RECEIVING 
OP CODE IN LCB 
YES 
E3 
E5 
POINT TO 
POLLING YES_“71S TERMINAL 
CHARACTERS RECEIVING 
(8) wy a 
SET FLAG 
GET ADDRESS INDICATING MAKE PREVIOUS oR CODE 
OF NEXT BRB ACTIVE POLLING TIC VALID ALFWORD 
LIST ENTRY HALFW 
" a7 
GET NEXT BRB 
ADDRESS, BACK CA as G5 
UP DATA 
ADDRESS TO PREVIOUS RETURN TO 
BEGINNING OF BRB A 'FIRST' cre IN 
BUFFER 2 
YES 
H2 YES , 
H3 
FOR EOB, CHAIN RESTART 
ee Stee HAS NEXT BRB CCW TO THIS 
A BUFFER BRB 
NO 
J3 
J4 
PUT COUNT IN EXIT TO LPS 
FIRST CCW CONTROL 
K4 KS 


K3 
No BUFFER SUPPLIED 
AFTER PROGRA 
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EXCP 


MOVE BRB 

ADDRESS INTO 
CCB CHANNEL 
ADDRESS FIELD 










EXECUTE 
CHANNEL 
PROGRAM 


—_ 





Chart RX. QTAM PIOCS--Channel Program Generator (Part 1 of 2) 
He HK K 
*RX 
* A2:* 
HK FoR ROK A 2 stk to ka tok Rake sok A 3 kk tok kak iatok 
x *COMPUTE ADORESS* * * 
P *AND COUNT FROM * * CLEAR eee CCW * 
ecccee ec X*PASSED REGS AND Ee sisi este eine AR * 
* EOB FIELD : > 
ROR KR tg Roa gc ak kc ake ak Tieeeeheeseekes 
x 
o*%, 
B3 x, 
o* *, 
* INITIAL *. NO 
«, OPERATION ot eeeceee cese6e ves 5-6 
*®. “* . 
x, 4X ° 
* YES e 
X : 
o*. e 
c3 *, . 
* Ke e 
YES .* *. NO : 
Soe eso eset elle ete 60a ere elie a ehG0! 66 sare bieilete Seles ees ee eeleseie ts SWITCHED 66 66. 0 6 0.0 6 6006 e 06 688 
" e LINE o* . 
x Ke XX z Rete he ke ie 
‘ *, 4 * . #RK 
° * é * ph 
e e x 
e e * 
e x e 
e Peay ae ae ee ee Te ae 
“ee .*, : x 
Ol x, D2 x, 7 Fok ROD Gok ROCKO a a kek ke ae 
* x, * x, é PRM ASCE RYG1 * 
o* COUNT *,. YES ALREADY *. YES Karr S Sasi sesss< 
*x,. OF CHARS IN i eee oe CONNECTED .*cccccnccccccccccccccncccccccscccs " POINT T9 OP * 
*.LIST IS 0.* « LINE . xX * TYPE SEGMENT * 
*, 7% *. o* e * MODEL * 
x, 4* Ke Sk ¥ FORO ROR ROK a ok akc ak akc ak ak 
* NO * NO ° . 
x x ; x 
eR a CREE | ate a kc ak ake ake eae 2c ak Ro ROK x ED ake ake ake ak ak afc ak akc ak ak Bom ee F Gk RK Kee ee aK 
* * x * ° ERWESCG RYA3 * 
*SET TO GENERATE* *SET TO GENERATE © Ree ana we ee ee * 
* CALL SEGMENT * *ANSWER SEGMENT * e : GFNERATE OP * 
x * * x é * TYPE SFGMENT * 
x *x x x 2 * x 
FORO ROK Ka a iC ak ak teak akc ak FORO ROI kok kak ak akc kit . ROR ROR ROO RIC ak kak ak a ak a 
; : ; 
\ BN BA a ae 8 Ata ott A ind eae . 
° . x 
x e o*e 
eR RE a ake ake a ak a ake aka ak . F4 , 
eee RYG1 * ° -* LAST *. 
oheeathertasiuteteaiateatetens si o* COMMAND *. NO 
xPOINT TO MODEL x e x, DATA e @eesenveeeoeseesvpeseeveeaese 
x CCW LIST * . *.TPANSFFR . ° 
x x Ze x, .* 3 
BOR ROI IOR ROR dota kk ak ak ak ak ‘s ek . 
e eo * YES e 
: : i" 8 ag ee ete 
e es . se x 
x e x ° o*. 
ek ak KG] ak teak a ke ak ak a ae é FOR ICG 4 HOR IOK SOK HK - G5 x, 
¥RW1SGG RYA3 * Ps * % : o* 

See ‘ * MOVE TIC FROM * ‘ 3X NEXT *. YES 
" GENERATE x . * BRB TO END OF * e x, BUFFER eX seer 
: SEGMENT : * SCHANNEL PROGRAM ¥ ‘ *oRFQUESTED .* ° 
SER ROR BORO kt a I Rae afc a y FOR ROR ROR RORO ROR BORO Rk ae ; “ee *« : 

a . : 7 * NO e 

x : x i : : 

3X. e *, e x e 

HI] x, 3 H4 Ke . SR RR HB te a ake 2 ae 2 ak age ok - 

° *, - x, < * % 3 

o* TWX *. NO < NO .* IS THIS *. ‘ *SET PCI FLAG ON* . 

x, DEVICE . J eeeeseeceaeevpe@eceeoeeaeveeeeeeeeeoeoeoeeaeeeoev vee e808 e166 € tse: 0.8) o:0 6's 666 Ke eeee tes A PAUSE BRS ae e * IN DATA CCW * se 
oe es eo e 7 e e * * e 
x, o* ee we, oX% > * * _ 
*. 4x eas me. Oe : eR RK aK oe oe he ke ae a a ate 2k ae ok ate ie 
* YES e s * YES o e e 
e : : 7 7 Misaueseuauce 
x ae K : x 

Me RR ae a a a a ak a ae a sr te MRR RR yk ROR HO Ro a ake 3K = ea J 5 Xe ak ak a ok 

* : 2 2 RADJUST LAST CCWH : eeeEXeCUTE 
° « Us Wx Fi * XFCUTE * 
* SAVE 10 COUNT * ‘ee *TO TIC TO PAUSE* ° x CHANNEL * 
: i ee : CCW v4 e PROGRAM hy 
FAO IOI I IR OK an TT TTTCTITE TTT TTT : AO Rak soc ik kc a 
CRW aim owe ese w ea aia els Weare oe WG tre ace eal Ba SW Wie Waa Ok be hb SRR Reh eee ov betesEneete 7 : 
x : : 
RRR Ky FOR RORO RO eK ae ae s X 
* MOVE CHAINING * ‘ ORR IC B oak eke ake ae a aie ak akc 
*FLAG FROM BRB, * e * EXIT TO LPS * 
SFt RESTART: * . x CONTROL * 
*ADDRE SS TO READ* ° * * 
DATA CCW * < ee ee eek ae a ae ae ke ae ke 
BORO RIOR BORO RK a OK ‘ 
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Chart RY. QTAM PIOCS--Channel Program Generator (Part 2 of 2) 
an 
‘ 
A3 
RWISGG 
B3 
WHICH MODEL 
CHAN, PROG. 
READ RESPONSE 
TO DIAL, ees BRANCHING TABLE (INDEX FROM MODEL CCW) 
DISABLE, READ OR WRITE READ RESPONSE SPECIAL 
ENABLE DATA TO ADDRESS CHARACTER 
RWISG101 RWISG201 RW1SG301 RWISG4O01 PO LLING/ 
Cl C2 C3. C4 ADDRESSING, 
PUT COUNT ADD MODULE PUT COUNT GET DEVICE DIALING/ 
FROM MODEL MODIFIER TO FROM MODEL MODULE ADDR ANSWERING, 
AND PASSED ADDRESS AND ANE BOMN AND CCW TWX ID 
ADDRESS INTO SUBT MODIFIER “RESPONSE AREA COUNT AND 
CCW FROM COUNT ADDRESS INTO SPECIAL CHAR 
ccw OFFSET 
RW1SG501 
D4 D5 
ie PUT COUNT 
DI “PUT MODIFIED FROM SPEC 
BNEGP ADDRESS AND CHAR TBL AND PUT ADDRESS 
COUNT INTO SPEC CHAR INTO CCW 
CCW ADDRESS INTO 
CCW 
El E3 E4 
OP CODE, 
GET DEVICE I/O an PUT COUNT Se 
MODULE FLAGS, TP OP YES MODEL 
FROM MODEL FROM SAVE COUNT BITS 0 
ADDRESS FROM INTO CCW, AREA INTO 
DIF INCREMENT TO ccw 
NEXT CCW NO 
FI F4 FS | 4 
a retria INCREMENT TO GET COUNT 
GET MODULE T COUN . 
OFFSET AND LAST MODEL NEXT MODEL FROM Sy 
MODULE ADDRES CCW CCW MODEL 
TO OFFSET 
RETURN TO RETURN TO 
CALLER CALLER 
RW1ISGAOI RW1SG801 (RWISG901 ¢, ID EXCH RW1SG601 RWISG701¥, TIC/POLL 
HI H2 H3 H4 H5 
PUT CURRENT pee tiny 
UT NEXT C ADDRESS OF 
fos! ny PUT SENSE BYTE PRT DOD OE POLLIST ENTRY NEXT CCW 
ADDR INTO RBpRINTO Con WRITE OR READ NB BELS 
CCW N IDENT AREA S INTO FROM MODEL 
CCW AND PUT 
INTO CCW 
43 J4 J5 
COMPUTE RESTORE 
eee COUNT AND COMMAND 
PUT INTO CCW CODE 
a 
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Chart SH. Scan Header Routine 





TJLQSH 
KOREA] ORE REE EHS 
* * 
* SCAN * 
* * 
REREEE EERE ER EE 
x 
SERCH EKER E EEE 
* « 
* INSERT * 
* BLANKS INTO #* 
* WORK WUR D . 

* 


REE ERK KEE EES & 


x 
KEKKEC | HEEKEEKEKES 
LOAD * 
* REGESTER WITH * 
WORK WORD 
* ADDRESS FOR *& 
* EXTERNAL USE * 
RK RE EK RR KKH 
SN tn Nat as hae ti la ee eg ce NS EL I a Nh ek es a a Pat is EN at tates ha ctret iad Ss in ala 
. e 
DL *e het) DK a OK 5 
e* END *, * * ° 
o* GF *, NO * INCK SCAN * ° 
*, SPECIFIED eK ececccccn eX*®PUINTER TG NEX: TEX 66's 0s ies Ss bere eteree oe 
*, FIELD o*% * HEADER * ° ° 
*, o* * CHARACTER * e e 
*, ,* CCE eS Le SS 222 2 28 n é 
* YES ° ° ° 
4 x . YES : 
e o*. ote e 
tL? x, b3 *, ° 
EKEKE | KEKE EK K .* x, * * 4 
* x ae END *. NU o* ¥ ° 
* RETURN * *. OF SEGMENT e®%escccee eX %e BLANK o* e 
* * x, o% *, o* a 
WEEK ER KE EERE SE & K, * x, XX 7 
&, o* *, * a 
* YES * NO ° 
% RK Ke é ° ° 
x * e ° e 
ae * Fe Ke Xe e a 
on * * e e e 
: Xe é * is 
ie: xX ° 
wes Z RRR RE DRE KEK ROE 4 ee ee ot KK ~ 
Me a * x x € ° 
* SFT HEADERR * * MOVE * e 
* GIT IN FRROR * oe X* CHARACTER TO * . 
: HALF WORD : . : WORKWORD : ° 
Rk Rk eo eo a RK - Rot aR I Rg dak ee ek : 
: x .*, ; 
x a ERK (, FRE EE KH G4 e, < 
KEK KD ERE EEK x * * *, ie 
* * ° * INCREMENT * e-* VARIABLE *. NO « 
* RETURN * . * FIELD SIZE * ee eo X*®.LENGTH FIELD e®ccce 
+ * . *COUNTER BY ONE *® ° *. SPECIFIED.® 
Fok RR gk a ak ee ok te - * * eS *. ® 
> PPS e ee SS t ee St ts st | ; *, _* 
° ° ° * YES 
: x : : 
eo o*, s x 
; H3 *, < PEOKEHGEKEREEEKEE 
° o%* *. « * * 
° * *,. NO ° *INCREMENT SCAN *® 
e x, wORKWORD oF ec cccce *POINTER TO NEXT® 
e *. FILLED .* + HEADER 
. ° ° * CHARACTER * 
e *.  * CECKKEEKEREEEREEKE 
. * YES ° 
; : x 
e e aXe 
° X J4 *. 
‘ KEK IZ ERK EEKERE * * xegE 
° * * o* END *. YES * * 
° * RETURN * *. OF SEGMENT .®ceeeX*® F2 & 
- * * €. PQ e * 
ESSE SESE LS ET SS *. * Por SF 
e *, o* 
. * NO 
i x 
e Ps 
° K4 *. 
° o* , SEEEK5 SEESESESES 
. -* *. YES * s 
e *, BLANK eFccccccecX® RETURN s 
. *, Py * 3 
° reg Poh SEKSSSESSSE CESSES 
: «NO 


@eeoeeeeeoeonveaeeeeeoseneeeeevenaeneeeveneean 
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Chart SI. Sequence Number-In Routine 


TJLOQSI 
WEREA] EKER ERE 
* * 
* SEQIN * 
% * 
SEEKER ERE REE EES 


wee eeee 


SUEHAH LS SESS ESET ® 
x 
* SAVE * 
pA BASE REGISTER : 


* * 
SCHEER KEKE EKKKEEK 


SERRE | EERE EEE 
* SCAN HAL * 
hh HK ER 
* GET SE NCE * 
* NUMBE ROM * 
* HEADE * 
HE EEK KEIR EEE EEK 


Mes eee es HODO KH Aowe ee ese 
Cc 
HETM HN 


BHKKEL/) | EEE 
* * 


* RESTORE * 
- BASF REGISTER : 


* * 
EK EMER EAE EEE HK 
‘ 
El *, REE E DEREK HE 
o* *. * CONVERT * 
.* *. NO * CHARACTER IN # 
* HEADER ERROR eKcecccce ee X*SEQUENCE NUMBER®X cc cece ccs ceccecces 
*, o* * TO BINARY * ° 
*. oX* * * e 
*, .* KEKE ERK aH EKER é 
* YES e . 
° X * 
x o*. e 
SRK KE | RARE KEE F2 K., EKEKKE TERT O HERO ERK 
* * o* *, ® * 
* SET SEQUENCE * * ALL *. NO * INCREMENT * 
* LOW ERROR BIT *X... *. CHARACTERS «¥#eeseeee oX* TO NEXT * 
* IN LCB * e *. CUNVERTED. * * CHARACTER * 
* * 6 *, o* * * 
WK ERE KKH HES EE KK a *, . * REKKKKKKKHOEHHE KEK 
° e * YES 
e ° e 
° e x 
x * RARE KG MRK K KEKE KKK 
RHKK, | EKER EKEK rs * MOVE * 
* * ° *BINARY SEQUENCE* 
* RETURN * . * NUMBER INTO * 
* * ° * HEAVER PREFIX * 
SPREE EKER KKK é * * 
‘* EEE EEE AKERS EK EK 
: 
e H2 *,. SEEKER LERCH OHHE RES EEK GEEEKKESCKEE 
° e* IS *. : * STORE * * INCREMENT * SCKHSHSSSEETSRSS 
. o* MESSAGE *. YES * EXPECTED * * EXPECTED * * * 
e *. NUMBER IN eo ecwce ce eX*#SEQUENCE NUMBER ce ce oe eX ®SEQUENCE NUMBER cc ccvcee X*® RETURN * 
° *. SEQUENCE .* * IN LCB * x FOR NEXT * + * 
e x, o* * * * MESSAGE * SESSESSKESESKSKES 
‘s *,. .* KEKEKKKER SHEE KERE KEKEKKEKEREKEEKEESE 
. * NO x 
° x e 
° o*. ‘ 
. J2 *. SHEEKIZTERSE HEH ERE 
e * *, * x 
e YES o® Is *,. NO * SET SEQUENCE * 
eoeene®, SEQUENCE oKeccceeee X*®HIGH ERRURK HIT © 
e NUMBER .*® * IN LCR * 
*. LOW .* * 
*, _* RKSERKEKEETEEHKEK 
* 
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Chart SK. Skip Character Set Routine 





IJLWSK 
Peer PCE OL ete sss | 
x * 
* SKIP * 
* ‘ * 
PS tee LE ses > FE FS 


Meesses 


Perrerer tt ete el st 
* * 
& 


* SAVE 
# BASE REGISTER * 
x 


* * 
Peete CeL © LS. tes 
e 
e 
e 
eXewrecsececeenseeeesseseseceeereseoserseees 


x 
C3 OR RR 
* * 
* STOKE SCAN * 


* PUINTEK VALUE * 
* IN SAVE REG * 
& 


* 
eR RO eke ROR 


wre se eee 


KEES RARE EERE 


* SCAN SHAL * 
Ka KK KK KK EK 


* (GET * * 
* HEADER * . 
* CHARACTERS — * ° 
RRR KR KR RE RE KK ~ 
x : 
RRO 3 Rok tok eo gk a 
* x e 
* LUAD FIELD) * ° 
*51T2-E PARAMETER * e 
‘ FROM LINKAGE : ° 
Peeer rr et ee fe et te . 
meee ba ad 
ke i \ e e 
[ s eo 
4 / eo is 
Sie 8 3 x, EERE GEER EREEESE - 
* x, x * i. 
*¥.SPECTFILED St FeaFecccces sX* SCAN PUINTER * eo 
Hs FOUND .* : VALUE BY ONE : . 
a a errrrrrrTrr Tt sit ae 
YES . e 
x 
a es 
4 *, e 
* ¥. e 
NO . 
*. SCAN ERROR Boece 
ve. «x 
*. .* 
* YES 
K 
HK OH RO Ke 
* * 
* CANCEL * 
%* Mul TIPLE * 
SROUTING IN LCB : 


ETH ORE KEKKKEKE 


Meseesoeesevesevneosvseeeee ts eeeoseesseeoseesee 


“Mee erve 


ROOK OR 3 tom i ta ae PTT CTR TT tt tt. tt 3 
* * * * 


* 7 * * KtotT SCAN * 

* I NUREMENT COUNT FX ce cecvose*Piilivitr TU END * 

* IF GOD * * uf BUFFER : 
x 

EE KARE EK EK E RRA KEE EEE HK 


Meeseseeae 


FR IORK 4 20k % tok tok oe 
* * 
* KETURN * 
* * 
KEKE KERR ERE 
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Chart So. 


Sequence-Out Routine 


TutLQsa 


RERKA ZEKE AH EEE 
* * 
* SEQOUT * 
* * 

SOR ROR Ke 


mMeasesee 6 


REOERB ZEEE REO O 


* EXPAND EXAlL * 
— kk Ke 
* re 
* EXPANL HFADLKR 
* + 


PS 22 2 2 222 5 2:5 58 Ee 

» 

x 
KHER ZAK RK OE HOE 
* GET + 
*BINARY SFQUENC( ¢ 
* NUMBER FROM * 


* HEADER PREF IX 
* * 


OE ER HE OOO 


Meee ee 


REECE OOS 
* 


* CONVERT StQ * 
* “NUMBER TO ¢ 
: DECIMAL VALUE ¢ 

* 
eter eS ere. et eee 


meee ee 


KEARSE ZEKE OO 
* + 
*UNPACK SEQUENCEI ¢ 
* NUMBER INTO *¢ 
: HEADER FIFI) © 

: * 


KEKE EEE EEO ES 


Meeeese 


HERE ZRH OOO 
* r 
x RETURN . 
* . 

KEKERKREKEE OH OE 
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Chart SR. 








SHKAKADKEKEKEHEH 
* 


* 

* SOURCE * 

* * 
RERAEKAK HK EE EEK 


Meee ese &e BCMW etree ee eo oe 


AoC 22k 1 OI toi atc ok 
* * 
Hk — HK KR 
*GET SOURCE CODE* 
* FROM HEADER * 


WERKE HK KEARSE 


pew ee oe 


feito D2 soa ekOt i i ototogo 
x * 


* GET TERMNAME 
* SIZE FROM 
. TERMTBL 

PPP crest 2 ee ee tet S| 


HH He Ht 


exe ee 8 


s x, 

* * 
*. AUTOPOLLED 
*, INE . 


7 * 
*NO 


eeece0neoeseeeee37ex7eeoeet ee 0 6 8 6 6 


YES 


eXscaces 


YES 


Coe ccccccccccce oX* 
& 


>a a ee ee es er ee er er er er) 


*” CU 
X*. TERM TABLE 


* 
*e 
ENT *. 


*. ENTRY FOR.* 


*.TERM .* * * 
xe 4 & We RR RK ee aK he ee eke ok 
*YES ° 
e X 
xX COMPAR2 o*e 
ee RH KG Fe Re ae eK KK 4 Xe 
*PUT ENTRY TABLE* * 
* FOR SOURCE * * END OF - NO 
* TERMINAL INTO * * TABL oXeee 
* HEADER PREFIX * ° ° 
* * *e o * 
We Re Re eo eae ae fe 2 ae a 2 he a OK *. 6 ¥ 
e *YES 
e KKK ° 
. * * 6 
° * H4 eee 
e * * 6 
tO = 
x SOURCERR Xx 
We MH FR KKK MEM EMH GREEK RK KH K 
* STORE ENTRY * * * 
* INDEX FOR * * SET INVALID * 
*SOURCE TERMINAL* * SOURCE ERROR * 
: IN LCB : * BIT ON * 
* * 
He he ae ae he ef a ee a 2 a OEM MARR KKK RH KH KH K 
xX e 
He Rete eS Bak ae ke ae ae ae ae ok a e 
* RETURN TO * e 
CALLER eat a 


eR a KK 


NO 


Source Terminal Verification Routine 


WR MRE GK KH KH HK RH 
* 


x 
* GET THE NEXT 


* 
pas aSeesc ste ENTRY ADDRESS . 


eaeeseeeveenvneesesneeneeneeneneeesneeaennenvnen ave 


X 

DIALUP o*e 
F3 

S 

R 
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Chart SS. Start/Stop Audio Line Routine 


: x ok. 
= Fe ROK A ae beccwsaee vases Pages *e 
* * x e e 
ect AR . * SET ALCB * *x ENTRY FROM * 2 * ALCB *. NO 
* AND * ~ * START * * SUPERVISOR * eee X*. STOP FLAG e*ccce 
eee . 8 Cee : errr rrr rr TT ie : po kee z 
MOPEDS Trane e Seka aa IOI II ROR IIo ‘ : “eo ° 
: : ‘ z ; *YES : 
, . x : s : : 
TILQSS : 7 ei seeeny Geenenen eee 5 aR Saco 
He Meme eke Bk abe a ke ae ak ok a ic ak ° ae? te : cer aCe ° : : ° 
* *x e e ° ° 
* RECT STERS * < e START *. YES * ADDRESS FROM ** ° * SET ALCB * e 
* IN THE * e Ke LINE oXecee * START/STOP . * START * ° 
* USER'S * 7 . ° ° * AUDIO ELEMENT * ° * REQUEST % . 
x SAVE AREA * . *e -* ° * e * FLAG ON x a 
FO IIA ORR Rak ak ak a . xe” . Trorterrrer errr et ty ‘ Tee TT e Le TL LLL SL S| 5 
e e *NO) eo e e eo e 
: : : : x S x : 
. xX e x e eX. e o*. e 
ea ROME Ck ge a oe ke ke a ok a ok e RERKKC FRAKES OHHH . C4 *, ° c5 *e ° 
* GET RELATIVE * ° * SET ALCA * ° o* x, ° o* HAS *. e 
* LINE NUMBER) * e * START FLAG * ° Ph STOP *. NO e e* PREVIOUS *. NO X 
* PROVIDED % e % OFF AND * ° es LIN oXccccce *, STOP BEEN) .*eeee 
* R * ° * ALCB STOP * e ° ° *. PERFORMED. * e 
x By Use * * FLAG 0 * * * * * 
rer tT TT TT TE eT et 7 TTT eT TTT TT TET TS 2 a a * Oe 5 
‘~ ° ‘. e *xYES *YES ° 
; : Pe Ree eres : ; A 
x : x x x : 
setok to D sak tok dk katte 7 $k D 3 Oe 6 Hk SAESFDANSTSIESAS geee st Dota settee : 
* * ° * SAVE ALCE * * e 
* GET OTF * s * ADDRESS _ IN * * SET ALCB * * STOP FLAG * a 
x ADORESS * . * START/STOP * * STOP * x AND ALCB e 
* * 7 * AUDIO ELFMINT - : FLAG ON : mA A aS One % ° 
* * e : ° 
(ORO RR a RR RR ie ak apa ai ae ak ; Peet T ee Ce TEC Pe SS Sek GR ok ag gk ok eT eTtTT tte re et ett ° 
x : x SSIEXTO9 x if 
RII EDR OR RR Ci ak Mek RE Dak tk Bok aK ; AXE ZAR HEROD 2a OE 5 totokokak a totokk é 
* SET UNOPENED * * SET OTF x HHKKQPOST# 40+ sok E Gaeta * SET START * . 
* " DTF ERROR x * ERROR FLAG * . * POST * * EXIT TO * * I/O AND 9 
* FLAG FOR % ge eo X¥ OFF AND * -  - ®START/STOP HOB *® *  QSVCDISP * * EXCP FLAGS * . 
*, THE USER * ° * INVALID RLN * . *TO START/STOP* * * * ON * . 
x * Z x L ( * 7 * QCcB * SO RRR Sok gO Ho x x i 
FOI OR RR RCH i BOR RR ok a ROR RR ‘ Tre r Tree er. x SEI ROR IOI IO ROR ROK HOR = 
7 7 : : : Beige te tee Rieate a la Spt Seth as oa Win enste ais oat 
x : x 2 
o%e e o Xe es xX 
Fl *, 7 F2 x. in Trt ri et rrrr rrr? +: 
oo ee ° x Is Ke e x GET ALCKH * 
e* IS OTF *. YES. YES .* PASSED *, ° * ADDRESS FRUM * 
x. OPENED oFecee eveo*®eRLN TOO HIGH .* ° * START/STOP * 
x, Pe ° ° OR o* ° * AUDIO ELFMENT * 
*. 7% ° *.NULL .* ° * 
xe eX 7 x OK ° TTT ttTTeCCerCee yy f 
*NO ° *NQ ° . 
He hee ° e ° ° e 
* * e e es eo e 
* Gl Keee eo e e oe 
*x e e e e e 
ee ek ° ° ° e . 
SS1RET10 x ° e xX 
OR ROR G2 dak kkk a a a é $e RG 2a RoR gO é SOR G 3 0K 8 0 OK 
* PUT USER'S * . * * . * * 
* ERROR FLAG * -  * CLEAR USER'S ¥* - * GET LPS * 
* IN REGISTER *Xeeee. * ERROR FLAG * . QUEUF * 
x 15 * * * - ACDRESS * 
x x * rs < x * 
SER ROROI RIOR ROR RR ORO I Steere Se te Le. Ss 7 Tete SS Se Te rere Tt. 
; x : x 
xX o * ° o*, SSLEXT10 
Me Me RR] te he ae a aha a ake 2 H2 Xe . H3 *. He Re he ae RY Re ae eae eae ke ae 
* RESTORE * Pe ° o* *. * * 
* REGISTERS % * START *x. NO e * START *,. NO x INCREMENT * 
* FROM USER'S * *. OR STOP ALL a*eeoe ee 1/0 oKeccc eve cX® RLN INDEX x 
. SAVE AREA A . INE ° ee *e FLAG ON .* xX . : 
e e e e es * 2 
HM HRM He He He He Re eR a aK *. 6X ee ta yd a ROR ROR ROR IR FORCE RCH RC 
ee *YES e e *YES e e 
‘ ae : : x 
e xX e e xX es eX 
x BOR ROR Dak ek ho do Fok Bae HK IZRRAH HOS vy, 54 x, 
atROR J) Fok a ake ak teak * * Bog #eEEKQPOST HO Oe _ % 
* RETURN TO * * SET RLN Foxe se * POST ALCK * - NO .* MORE *. YES 
7 CALLER * ; oo ORs : ee Bee TO LPS Keeece eooX*, LINES TO o*,eae 
e es * s e * e 
FOR I ROR kak 8 ORC af ae ai ak x 7. - n QUEUE F : * CeNSTOER : 
PTT TP CLOSES Se te tr’ a oe PTT er erer ery xX x. 4* x 
‘ e246 sek kt * KK 
ae ko é te * * * *x 
* * . ee x * * *x 
* K2 *.ee ee et * * ee x 
area eoXesscccscece e He KK wm kK 
SS1LOOP5 Xx . 
MOR RRR Dok kak ho a a ak a a im 
* e 
* COMPUTE ALCB * . 
* ADDRESS FOR * ° 
: THIS LINE * - 
* e 
SOROS bok tk 4 
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Chart ST. Skip-on-Count Routine 





ea ‘ 
Ne 
LJLJSE 
aR AB Ro kkk ar tok 
x 
* SKIP 
* 
Be ak a ae a a Seok 


* 
x 


Kese eee 


ata 


ORR 3 doko dade date & 


x 
LUAG SKIP #* 
CUUNT PARAM * 
PROM LINKAGE # 
Xe oe A RR aa te ko 


edt Heit Se te st 


wonnnaccan Xe 


: x 
Pe Re eo aR C3 RC A fe aK OE ote 
‘e % * 
2 KINGREMENT SCAN. # 
° *PUINT rR TO NEXT# 
D0 & CCHARACTER # 
- lk . 
. ARR yom Ro gk dk oe 
: xX 
- o*, 
* 35 *. MR RO a |) Ay OR NO oe mR oe a & 
‘ o* Ky % * 
: .* EN) YES * SET * 
e *e WF SEGMENT eX ecccene oX*Et AVE KAR oT IN * 
: #, .* * Lcb * 
x, * * * 
: *. ok FRE AOR ROR RR a 
° * NO . 
3 x : 
° o%. . 
. t3 *, Fa 
° * x. * 
eYfS .* . 
eee a Xe BLANK o* . 
K . ° ° 
. x. * « 
. *. ot . 
. * ONG « 
al a \ ° ° ° 
fo : x : 
.e . TREE 3 ok qoR totok ok koto ‘ 
ae ox x : 
. * * . 
* *OFCREMENT SKIP * ° 
° * CUUNT ¥ ° 
° * * e 
: ret T eter rere TT : 
: X : 
. 0%, - 
° G3 ¥. . 
° o* *e ° 
e ae o * oo 
eee eX COUNT EQUAL o* . 
*. ZERO o* ° 
Ke o* ° 
*,. .¥ . 
* YES . 
ihe ca sebauaies soaca ei aeewes 


x 
Rog dab, 3 take dob a 


3 Ht Ht 


x 
- RETUKN 
OR IR ROI R a a ek 
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Chart TM. Terminal Test Header Analysis Routine 


IJLOQTM21 
WREKALEREHESEEE 
* * 
* $SBQHDCK * 
SREKEKEKREEKERES 


Meseoeoee 


etter ence seer ee 
* 

*ESTABLISH BASE * 
# REGISTERS ANO * 
* CLEAR NO-TEST * 
* SWITCH * 
ERCKSEKEEEKEKEEEEE 


exe eee 


e e 
ci *e 
ot Be 
o* FORMAT *. YES 
*e O (ASCII OR eKcccaccvcvneccseecce 
Ke sco) eX 


* NO 

e 

e 

° 

e 

° 

x 
SWEEED 1LEKKEKSEEEKE 
* * 


* PICK~UP COUNT * 
* OF CHARACTERS * 
* IN SYMBOL * 
* * 
EHOKEKSKKEKEKEEEKE 


e 
e 
di 
e 
x 
oe 
€1 *e 
o* *e 
o® *e. YES 
* eASCII FORMAT eKecececececnesezsence 
Ko 1 o* 
Ke ot 
Ke ot 
NO 


exe eee & 


Fl Xe 
o* Ke 
ot *e NO 
*%eBCD FORMAT 1 e®eccccccsecsscsces 
Ke o* 


Fe o% 
* YES 


eeeeoeoeeevoeeoeseeeseve eee evee ee seevrseeveaeveeveeeveveevsee es eeseevoeoseesee ete oes ev0v8 eee a6 


M%Meeese 


o*e 
Gl Ke 
a Xe 
eo SYMBOL *. YES 
*eCOUNT IS ZERO oFeccececccecscccacesesececccsee 
Re (Bcd) 0% 
Ke. e 
Re o® 
* NO 
° 
eoXeccccsccvce 
° 


CTrcrerree ee eer eee Se ee ee ee a ee a ee ee ee oe ee ee ae ee ee ee oe ee 


x 


oe 
83 eo 
ef s 
o* 1060 


>. NO 


te COMPARE TEST «*ece 


*e REQUEST 
#o. «4 
te ot 


oy 

e 
wseececvceeeXe 
ZERO e 
CONTINUE X 


* 


FINO 
ADORESS OF 


#EEESEEEEEEH HOSS 


eMeeoeseevevnoeveeepeveeseeseeeoesevneseveveeeeeeeeveeve 


* 
* 
* TABLE ENTRY 
* 
* 


o% 


SEKKECIHFVSEHEDOS OS 


* 
¢ 
¢ 
* 
* 
+ 


eevee eX 


° 
CHECKS x Py ASCIIN ote 
HOKE 1LSEKEREEEEEEK ° H3 Be 
* * e o% *. 
* TRANSLATE * e YES o«# SYMBOL e. 
* SYMBOL TO * e eccoce*eCOUNT IS ZERO* 
* EBCDIC * ° *%e (ASCII) «6 
* * e *e o% 
SESEKKKKEKEREEKEKES e Be of 
e e * nO 
e e e 
e SPCC H HCE SH SASH EHH HOS HHSC CHOSE LOREOREOCZOO®E 
e 
° 
° 
x 


CHEEKS LEEK EREEE 
+ * 
* SET-UP TO * 
*SEARCH TERMINAL* 


* TABLE * 
* * 
EKEKEKEREEKEREESE 
° 
e 
e 
e 
e 
x 
NEXTIO oe 
K1 Re 
ot ®e 


e* IS SVMBOL *. YES 


Ke IN TERMINAL Kee we coerce er eco es ees es sa ceseeh ese ee Haseesaeeeesecesseseon 


eo TABLE ot 
eo o% 
Be ot 
* NO 


Sees 
AS 
e448 


eae 
+e 


ec eccescccccccccascccccoscnccsscsccecosexes 


eeeoetoecenevevneeeeosene0ee8s 


@eeeeeoevoeoeevseeeeeeevneeevsseseeeveseeseeovseveve eevee eeeteteovsesvsevoeeevoseseeaseeasveeeeveveeeeoeveeveevevneeeeeeoeevseeseeoevoseeevoeeeeveevesevneveveeseee ee eens 


eeeeoeenneeoe2ee00 

e 
IDFOUND xX 
SEKSEKGHSKEKERKESEE 
*x FINO LCB * 
* ADDRESS. PUT * 
*1T,. OEVICE TYPE* 
* AND FEATURES IN*® 
* BUFFER. * 
SKEKRSEEKERSEREEKE 


Keeooee # 


EEKEEDAKEESESER ES 
* PUT * 
* DIAL * 
* INFORMATION * 
* ADDRESS IN * 
* BUFFER * 
EESKESKKREKEKESCEKEE 

oe 

@ 

evccecvceeXxe 

e 

s 

e 

NOOIAL x 
SKEKSE 4EEEEKEEEEE 
*x PUT * 
* ADDRESSING * 
* CHARACTERS IN € 
* BUFFER * 
* 
* 


* 
EKEESKSESEESEEESEED 


[> oe ee er) 


eke 
Fa Re 
ot #e e 
o% FROM *%e YESe 
#eAND TO A 2260 ce cece 
NO 


oesoetvoeoovoeeoeoeoveneeoevseseovaeeeeneseosevoveeeeses eee ees eeen1ee@ 


Kesee & 


ee 
G4 *e 
e*FROM A #. 
e% BCD *e YES 
*e TERMINAL AND e*cccce 
*eTO A 2260c% 


Be oF 
* NO 
e 
e 
e 
eo 
x 
o*e 
H4 te 
ot Be 


e*FROM A 2260%. YES 
eo. To A BCD o*ecvee 
#eTERMINAL o* 
ee ef 
* NO 
° 
oXecccescsccce 
° 
e 


x 
TEST2740 o¥- 
J4 Ke 
ot *€e 
o%* Is *. YES 
*®eMESSAGE TO A e®eecce 
eo 2740 ot 


Ke of 
* NO 
e 
e 
e 
e 
x 
ot%e 
K4 #e 
o* eo 


e*IS MESSAGE *. YES 
*e TQ A 1030% etecces 
*e 1050 OR .* 
*e1060 «* 
te o% 
* NO 


SHOSHSHSSEHOHHSHSSOCHESHRHSHSHSHHSHEHSSHSHSSHHSHHSCHSHCHROESHSSHSHOHSSESHESEBHB OES eEseceesesseezanseseso rte 
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x 
ee8 
* * 
* AS *% 
* * 
eee 


RESTART X 


EHREKASHESESECEREEE 
+ SET * 
*NO-TEST SWITCH © 
* AND CLEAR * 
* ADDRESS AREAS * 
* IN BUFFER * 
SHHEKKSESKSHKREKKSE SSE 


xe eo eeee 


SEEKEKBHESCSHKEKESESE 
* RETURN TO * 
* CORE RESIDENT * 
* MOOULE * 

SHESKEEEREKESEE 


x 
EEKKKCHEEEESEEKEKES 
* * 


* * 
*VALIDATE HEADER* 
* * 


* * 
KECSESESEKSKSEESEKESE 
e 
e 
° 
e 
° 
x 
o ¥e 
os Re 
* eo 


NO «# WRITE AT ¥*. 


evee*eL INE ADDRESS .* 


Ko TEST o% 
Be. ot 
*. 2* 

YES 


* 


Kee eee 


SHREHESERESSEECEES 
* SET * 
* UP LINE * 
* ADDRESSING * 
® CHARACTER * 
* * 
* * 


EREKSSEKEKEEESEE 
s 
e 


eececececseoXe 


e 
FTCH2260 e« 


x 
KEEKFHKEKSEERES 
* FETCH * 
* 2260 DEVICE * 
* MOOULE * 
SEKEKEKEKEKESEKREE 


BCO02260 xX 


88 SKEGHEEEEEKEESE 
* ; * 
* TRANSLATE * 
*INPUT TO ASCII € 


* FROM 8CD * 
* * 
CEKKKECEEEEREEES & 


2 
ASCII8BCD X 


SESCRHSESCEKEKEEESE 


* 
* TRANSLATE * 
* INPUT TO BCD * 
A FROM ASCII : 
SHESKTESEKSEESESEE 


@ 
e 


* 


eeeaeeeaeneoevaen®e 


eeeoeeeteonveeeens 


e 

TO2740 ° 

x 
SEEK IS KOEREKEKE ED 


*VALIDATE HEADER* 

*ANO FETCH 2740 * 

* MODULE * 
SESEKESKEKEESKES 


eeeeeoenea seoenen 
CALL1030 « 
CALL1050 e 
CALL1060 X 


SECEKSSEKEKERESRE 
* FETCH 10302 * 
* 1050 OR 1060 
* DEVICE MODULE * 

EKSKEEKEEEESECEE 


eocecccanseccescaeXeaneseanvecse 


®eeoeveesceoeoeose eaves oanessevneeseveseseeeovoevoeveeevp eee eceoeveeevnevnveevseneeeeeevnseeveevneesnse0etss 








Chart TN. 


SRESCKESKEKEKESE SEE EKEKEEKESES 


* 


% 


* TERMINAL TEST * 
* BUFFER ROUTING SUBTASK +*# 
* 


* 
SREREEERKESE KE SCHEKESEESEKEEEES 


e 

e 

oe 

e 

e 

o 

e 

x 
SREKRSED LEEK EKEEE 
* SET UP 


* 
* POST TO * 
* AVAILABLE * 
* BUFFER QUEUE * 
* * 
SERKEKKSEKKEEEKEE EE 


NO .* 


ecccecccevecccecoese Fe 


44048260468 FHKE 
* 
* ENTRY * 
* * 
KEKEKEEEEES REESE 


exe eevee 


o%e 
c2 ¥e 
o% eo 
HEADER Be. 
SEGMENT o% 
Re o% 
Re o*# 
eo 2 & 
YES 


Me enee 


#EEEED[IESEEKREE EEE 
* * 
* SET TERMINAL € 
* TEST * 
*IDENTIFICATION *# 
* IN BUFFER * 
FEEEEEEEEESEEEEEE 


e 

x 
HESEHE 2 EHEEE SEEDED 
* * 
* SET UP * 
* pOST TO LPS * 
* QUEUE * 
* * 
TEEKEEEEEEESEHESRED 


Peeereesccencansensessece Xe 


x 
OEE 2EEEEEEESEE 
* Exit T9 * 
* QTAM POST * 
* ROUTINE * 
EHEKEEEEKEEE EE 


aoecownesvoeaananeeeaeeaeneneeaeeaneeeeaeeenneaeeceneeneeeeeaeeaneeeneaesnewneaeeaananeeaneneennanneenananaesneneasn 


Terminal Test Subtasks 


SEHSCSKSEKKSESEKSEKSESESEKSEESSKE 
* * 
* TERMINAL TEST * 
* STOP LINE SUBTASK * 

* 


s 
FECES HEEESEEKEEEEEEKES EE 


SESE AKKSSESE ESE ¥€EKBSSSKEESERSE 
* * * ENTRY * 
* ENTRY TO STOP *% * AFTER LINE IS * 
* LINE * * STOPPED * 
SSESeREKEKESERESE PES ESET ELT EES ES 
e Py 
e e 
° e 
° e 
e e 
e e 
x ° 
o8o e 
c4 Be ° 
o® te e 
NO .*# Be ° 
eeecccccsecsccasecte OLAL LINE o% e 
e e e ° 
e Lm o* ° 
e te o% ° 
e * YES e 
° e ° 
e ° e 
° e ° 
eXeecvecccosoce ° eeccvccsovccve 
e . x ° 
x e ee e 
*O$49DN34SSSKSEKEKE e 04 Ke ry 
* * e e*LINE IN®. ° 
* Set * e o* ACTIVE *. YES e 
*UP TO STOP LINES ° PeTRANSMISSION ce¥ecccccceccccscvsescce .e 
* * oe We eo e e 
* * e ee. o*% ry e 
SHESESSEESSEREVEKESE e Be oF e ° 
e e * NO e e 
° ° e e ° 
° e e e e 
e e ° e o 
° o e ry e 
e e e e e 
e ° x x e 
x e SESH SHEAEKEKEREEE KE HKEKFCEHKESCEKERSSE e 
V#HSGEZHHEESEKEKE e * SET s ° 
* EXIT TO GTAM * e * HAL T * * LINE NOT * e 
*CONTRCL CEFER— * Py 1/0 ON LINE *AVAILABLE FLAGS*® e 
# ENTRY ROUTINE * ° * * IN BUFFER * ° 
O4¥SEEEEKEKEESBEESE e s * e 
e SUCKER KEKEKESE SBEKESKSATEKSESESEEKEES e 
e ° e ° 
e ° e . 
e 


@eeeeaenaee anes vneaan eee 
NOTE--THE DEFER ENTRY ROUTINE 
WILL PLACE A TEST STCB 
IN THE LCB STC8 CHAIN. 


NOTE--OTAM PCST ROUTINE WILL PLACt THE BUFFER 
ON THE APPROPRIATE QUEUE. 


eXecvcccecsces 


x 
FEES SKE KEKKETE 
* * 
* SET UP POST * 
* OF BUFFER TO * 
* LPS QUEUE * 

* 
* 


* 
SEEKKKEKSEEESESKERSE 

e 

s 

e 

e 

es 

e 

es 

x 
SESKGH EEKEKEEEE 
* EXIT TO * 
* QTAM POST * 
* ROUTINE * 
SEKESESKEKESESE 
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Chart TR. Translate Routine 


Perey elertr rT tS: 
* * 
# TRANS * 
x * 
Serrrert ert ree 
eo S rriany 
FSEB oP Tg, : 40K B 34 OR AOR HO Hook 
.* ; : * * 
o* #. YES: *GET AUDIO _INPUT* 
*, ALCB seecas *BUFFER ADDRESS * 
*. .* * * 
x. .* x * 
ke ok ererer rrr tere r os 
*NO e 
x x 
Sek 2 daa OR IO SetHEC OSE EES OOH 
* QOBTAIN REL x 
* ADORESS FROM * *GET AUDIO INPUT® 
* LCB OF FIRST * *MESSAGE LENGTH * 
* CHARACTER TQ * * TO TRANSLATt * 
* RANSLATE * * * 
Tree r rte rer r ef wrrrett rt tt etree. 
x 
o ¥, 
D2 *. 


* 


o* - 
NO .* TEXT Xe 


* * 
*SKIP THE INDEX * * COMPUTE * 
* B * ee eX*CHARACTER COUNT* 
. TRANSLATION : * TO TRANSLATE * 


iS e Pee Releetensca€s : “SEGMENT- . :S% : 
e xe, eX es 
e *. o* e 
e xe Xx es 
° . *YES e 
x x : 
TRHDR o Xe o *. ° 
Ke E2 x. . 
aX Re o* x, ° 
ox *,. NO YES .* * é 
x. * « %e 2 ¥ e 
*YES ‘. *NO a 
x : z : 
Fl xe * Re oh eK RE DK ak ae Me he He a a HK e 
o* Ke ° x RE eene eee REL * . 
e* INITIAL *. NO X x RESS OF x Pe 
Ke READ og NO XS mPIASS CHARACTER* Ps 
mere RAD EONs* 7 : TG TRANSLATE : s 
a a : TTeTT TTT TTC TTT : 
*YES 7 ‘* ms 
x A x : 
PeTTTISe TTT Tet. ae $etRG 22 Jot tok dot tetok c 
e * * ° 
ce ‘ 
erere re tT TT TT ae Trrees Tee eT Te TT 7 
USEEOB x oe, CONV x 
fe eH aa tekoiekatetok ° H2> x, SARAH OEE EH 
* COMPUTE FULL * ° o* *e * 
* ADDRESS OF * ° * Is *. NO ; ANSLATE * 
SFIRST EDRRACTERSeceee. *. COUNT ZERO «*®eccecce eX* cure ACTERS * 
TO TRANSLATE : x, o* * * 
: *e .* * * 
Gaauseeveesusesee * 4% ETeTTTTrTreriyTe. 
#VES . 
a ae @eeeeoeeeeeeaeeseeeasesee ee i Ao 
x 
PTT TAPE Te Tere. 
* RETURN TO * 
* CALLER ‘ 
AAI ISO tolaitotototok 
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Chart TS. Time Stamp Routine 





PILATS 





RK AS Rok RK Ke 
* * 
*  TIMESTMP * 
He eR a a ee 


wreeee#8 6 


oe GOK 3 a ae a ee & 
* EKPAND EXAL * 
&— eK HH 
€ EXPAND HEADER * 
* FUK TIME * 
* INSERT LUN * 
RRC a KR tO Wok 


Meee saa 


RE 3K Ke eK 
% % 

& MEROEDITMEL Re & 
* GET CORRECT * 
* TIME OF DAY * 
* * 
He Re ea he a 


Mees oe 


tok $k () 2 ke ee 
x 


* 
x PUL TIME * 
* UATA INTO *® 
* WwURKKWORD 
x & 
ee ee ee eer ee ee Tse 


weseese 


RRO be a ke Re a a ae 


X x 

* % 

* UNPACK TIME * 

Bs DATA * 

* x 

AO ROOK ROR Ka Re gto a 
XK 


ROX RORRE ak Go RRO Re ae 
x x 
* MOVE FDITED * 
“TIME DATA INTU * 
: HEADER % 


* 
Be RO RRR ROR totot ak 


mMeeeseoe 


RR ORG, 3 tot a aR Rk 


x & 
* RETURN * 
* * 
ROR RGR RR a ito kak 
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Chart TT. Terminal Test Recognition Routine 
TJLeTT2i 
*€24EB246 6884484 
* * 
* IJLOTT * 
* * 
EKKEKGEESESESEDRE 
e 
a 
e 
e 
e 
x 
oe 
ca Ke 
o* eo 
o# TEST *. YES 
eo SET-UP 
*#e REQUEST .* 
*e oe * 
Re 0 ¥ 
* NO 
e 
e 
s e@eeeeveans ea eae enevneaeaeaeneeanvnev 2 oe 
x « 
oe se 
D2 Ke e 
o* He ° 
e* TERMINAL *. YES ° 
*e TEST ACTIVITYet®ececve e@eeaeonvoeneaenee30 880 
Ke et . 
Ke o* ° 
Ke o* e 
* NO e 
e e 
® e 
s e 
e e 
x e 
o#e x 
E2 Ke PHKESCEDSERHEEKSE SS 
0% Ke + ¢ 
NO «*® *e * FREE TERMINAL * 
eeoccscencoccccecscve*e TEST REQUEST .* *TEST CCW AND/OR* 
° %e : o% * PATTERN AREAS ¢ 
e eo o* * * 
° Ke o & PEF SSE SESE SES ERE) 
° * YES ° 
e oe 
a s s 
e e 2 
e ad e 
e x es 
@ aXe 
x F2 “Be HRRAGE I4EVEHHSEH DG 
HHESF LEKEKEREERE ot Ke * * 
* * e*® RETURN *. YES * QPOST BUFFER * 
* RETURN TO LPS * *e- TEST ON DIAL eo€ecee * TO AVAILABLE e 
* * *e LINE % e * BUFFER QUEUE ° 
BEEK EEESESEKEEEKES *. o* e % * 
Be et x SKESEESESEESEH AEDES 
* NO ¥sEe e 
* * * e 
° * cS * ° 
e * * e 
° +o is 
x x 
REREKKG]EKEEKEEDEE SESCAKEEGCZIEETESCSEE SESS 
* SET LCB * 
* DESTINATION * x START e 
* FIELD TO TEST * LINE VIA 
* @CB ADDRESS * * QeosT * 
* * 
SREEKERERERESREBEE 1HEKEEEEEEE ES 
e es 
a 
x 
KKKKHACHKESEKEK 


*RETURN TO QTAM *€ 
*BUFFER RECALL— * 
*CLEANUP ROUTINE® 
EREKEKEREREEEEE 


NOTE--THE QTAM BUFFER RECALL-CLEANUP ROUTINE POSTS 
THE BUFFER TO THE TEST BUFFER ROUTING QCB. 
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x 


D4 
o% 
YES .# TERMINAL 
eoe*®e TEST COMPLETE. * 
Ke o* 
Ke o*% 
o% 
NO 


eo 
Re 
Fe 


eeeoe & 


x 
SSCSEKKEAKEKSEKSEKERE 


* 
SET FLAGS * 
FOR LINE END * 
APPENDAGE * 

* 

* 


tHe ee 


FERKKEEKESEEREKES 


eo 


Meeeee 


SESKEFAEEKEKKEREE 
* 


* 
* INITIALIZE * 
*FOR SENDING OF *€ 
* TEST MESSAGE *t 
* * 

* 


REKSEKKEEEEKEKETES 


Keeuces 


SHEKEKGASCESKESEEEEKEE 


* ExcP TO * 
SEND TEST 
* MESSAGE * 


SREKKEKEEEEEE 
es 
es 
. 
= 


x 
SEKEHAEKEEKEKER 
* RETURN TO * 
*x QTAM LPS * 
* CONTROL * 
SREKEEKEEEKEERED 


eKe ee ee eee SO Se RSOHSSHSOHHEHSHS SARE SHEHSSSHHEHCHSHHESHESOECHETEC ES EEHEAO 


tee 
cs 
xt 


eee 
% % 


eacececvcceoXe 


s 
e 
e 
e 
e 
e 


x 
FTEKEKCHSKHEKEREEEE 
* * 
* SET TERMINAL * 
* TEST ACTIVITY * 


* FLAGS * 
* * 
RSTKEKEEEREE REESE 

e 

se 

e 

eo 

e 

. 

x 
EREEDS OHEEEEEEDE 
* Svc 2 * 


+-*—4-4-—4-4~ 4-4-4 
*CALL + EXECUTE * 
* TERMINAL TEST * 
* TRANSIENTS * 
CeRKEEKEHERERE ERE 


exec eoes 


eo %e 
ES ®e 
e* Be 
o* *e YES 
*#e TEST DEFERREDec Feee 
€e o* 
Re o* 
To 0 
NO 


Ke eee ee 


SSSKAFHSSKESSLSERSE 
* * 
* POST * 
*BUFFER TO TEST ¥* 
Ps STOP LINE OCB ; 
SKESCEKEKEERECKSEESEEE 

e 

e 


xe eeeoeeoeeeneeee 


seeesveseceos 
e 
x 
KEESKGHEEKEKESEKES 
* * 


* POST * 
*BUFFER TO DEFER* 
* acs * 
* * 
KKESKEKKSERERKEESES 

e 

° 

s 


CeeecececccsceccceccecsnecceseXxeXesccceseeeseeneeeseseseee 


Chart T1. Terminal Test Module for IBM 1030 





FOCSCSE THEE ETOHEEKEHEEEESREEESERES EHH ES 
* 
* 1030 TERMINAL TEST MOOULE 


a 
* 
* * 
*(TYPE 86 LOGICAL TRANSIENT ROUTINE) : 
* 
SRHKHESSEHEEEHESEEESEEEEREEEEKEEEEEES HD 


Tutati2l 
O4EEBH2EREOEEEDE 
* * 
* $$68Q1030 * 
* * 
SHEE EEEEEEEEEE 
e 
e 
oe 
« 
C) 
C) eaeveereeeaeseeen 
x « e 
oe. ° RESTART x 
c2 Me ° SHKEERCIHVHVEKEEK EE 
o* *. ° * * 
o* as *e WO ° * SET * 
*e THE HEADER e%ecvece #NO-TEST SWITCH * 
*e VALID .* x * * 
eo * e * * 
Be 0 & e TEES SESE SEES ESE S S 
* YES ° ° 
e e e 
e e e 
e e oe 
e e e 
x e e 
oe « ° 
02 #e e x 
o* Me ° VOHH*DIHHKEEAEEKE 
ONE -* #e ° * RETURN * 
cee ececcoccsrccncets FORMAT ot ° * TO RESIOCENT x 
° eo o* ° * MOCOULE * 
e €e o* e SEEKERS EEBERERE 
‘ %e « ¥ ° 
° * ZERO e 
o ° e 
e e ° 
e e e 
e e e@ eeeeneneenntee 
° e ee x 
e x oo oFe 
. #*HECKEDEEKEEEAEEED oe E3 oe 
° * MOVE * oo ot eo 
. * ADDRESSING * ee e* MESSAGE *. YES 
° *CHARACTERS FROM* eo @ *. SWITCH TEST e® cece ecnnccvesecevssecceseeeseeseceseeseoeecs 
° * MESSAGE TO * oe ¥e o* e 
° * BUFFER * o. #o o* ° 
> CHEER EREEE EE EEEEE ee to 2% : 
° e ee * NO ° 
° « 2° @e * e 
e e oe ¢@ ° e 
e ° ee e e 
° e eo e ° euvecenenaaevnesn eovcevccccese Xe 
ae , e x o e x x ° e 
fu ‘ e oe 2 e oe ° COMPARE oe e MSGSWTCH X 
e F2 *e oe F3 Be ° Fa Fe e SESKHEHAKEERKEKSEE 
Vag ° e*MANUAL *, ee o* Be e o% we. ° * * 
wn Fe. e NO -e* ENTRY OR Ke oo «@ ot *e YES e 0% Is *e NO e * SET UP * 
ai wXevcccvcccscceeecec* e+ BADGE READER «* ee *.- COMPARE TEST eF¥eccene @¢.COMPARE DATA e®eaceXe * FOR MESSAGE 
° we. o* oe *e. o% *. OK ot e * SWITCH * 
° ®e o* s @ #e o% eo o* e * * 
. Fe ot oe Bo 0% *e oF e RHKKKEKEKEREEEEKEKEEE 
° * YES ee * NO * YES ° ° 
e e e oe e ° e e 
e ° o «@ e e C) ° 
e e ee e ° e e 
eXeceeceavccas ° oe e« o e e ® 
x ° » o* e ° ° e 
o%e e NCTCARD xX oe « x e ° 
Gi Be ° RERKEG2EEKEKEEEEHED ee e CECH HGCEEEREKERERE e e 
o* Is #e . * * ee e * * ° . 
NO o* BUFFER SP e * CONVERT * ee ° * SET UP * ° ° 
eeoee*eLARGE ENOUGH -* ° * ADDRESSING * ee ° *¢ VALID COMPARE * ° e 
e *.FOR CCw'S.* ° * CHARACTERS * ee ° * MESSAGE * « e 
= Fe o* e * * aie ° 6 * ° « 
° ee 0 € ° RKEKEEKEEKEEEEERE ee e COCK EKEKEEKEKREKE e e 
a * YES e e oe e e e e 
o o e e ee ° ° ° e 
e e ° e oso e eoneeecenevneven een e 
° e oe e ee e e 
e e ° e eo} eX eee eee he SS Ses aH Hee SHOE HOHOHRSSOHOSECHOHEASOLES ECO LESD 
~~ eo e x J e 
° x « o%e eo. NOTINUSE X 
e HOKEEH 1LEKEEESERESE e H2 oe ee $46 64H 3404S SKKEK 
° * * e o* Xe oe * * 
e * SET * e YES «% VALID *e NO o eo *#SCAN WCRK AREAS* 
e * FLAG FOR THIS * eceecet%e ADDRESSING etecee * FOR * 
e * CASE * *e CHARACTER. * . * AVAILABILITY * 
e * * eo o* e * * 
e EHC EKESEHEKHEKEEEK ee 0 ® e PEEKS EEEEEREEEESES 
e e * e Co 
a e e e 
e Terr rrrrrrerererrrrerrrr rr rrr ee es ee ee e 
e e oe i 
mevehbweovoace eaeaseeneaeoneaen ne e e onveewvvaeneaaeead @eeeeeoeeneaseeade : 
e ° x e x e e . ° 
x ° o#. ° ote « x ° SETCCWS xX 
SEEK LERKEEEKESEE e J2 Re e J3 eo ° SCSCSSHIAEKEEERKRESEED e CERES ISS EKEEEREEE 
* * ° o* ¥e ° o% Ke ° * * ° * * 
*SCAN WORK AREAS* ° o*% WAS *. YES .« o* WAS *. YES ry *SET USAGE COUNT# e * * 
* FOR * ° eo CORE eteceece +. CCRE o¥eccvcee * YO ONEe MOVE * ° * SET UP CCw's # 
* AVAILABILITY *€ ° #e AVAILABLE. * *e AVAILABLE -* * DATA TO AREA * e * * 
* * ° Re o% Be o% 6 AND PAD * e * * 
FRBEKEEEREREEEEEE ry To o t. of COOH SHHKESEREKERED e SHREK SSEKEKEEKEEKE 
° ° * NO * NO e ° e 
e e e e e e ° 
eeceeeneeeneeeenee e e ° e e 
e e e ° e 
eenveereesenee eXeewsecceescccsecceacveccce ° e e 
e o C) e ° o 
° e DEFER x SETODATA x ° e 
x e REKEKRK2IKEESEKEREE SOOOHKKABEESESEEESE e x 
PHEEK 16484 SKEH e *SAVE POINTERS, * ® * e CESEKSEKKSCEKERE 
* RETURN * ° #FLAG THAT THIS * ‘ SET UP DATA * ° * RETURN * 
* YO RESIOENT * ° * IS A DEFERRED * * CCw FOR THIS *& o * TO RESIOENT *# 
s MODULE * ° * REQUEST AND *# * PATTERN * ° * MOOULE * 
TREKS SEREEKEE RE e * FREE AREAS * ° * ° ERECHRESEKSEEKREE 
° SEKKKEEEEEEEEEEEE SOOSHEKSEKEKEREKE ry 
o e e e 
° e e ° 
@oeoeeerseeeenceee @eaeceeveveenverveoe 
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Chart T2. 


tewaeceaeeeeesn 
° 


Xx ‘ 
MOEGREDLERERERESER yg 
* MOVE * 6 
* ADDRESSING * «4 
*CHARACTERS FROM* 6 
* MESSAGE TO * 
* BUFFER * 
err rttetittrtict st. 
® 
e 
@eeeoneaceasenens 


@seeeaeecenaeaeaeae ene 
x 
ake 
el eo 
o% Xe 
ot *. 
*e ANSWER LIST 
Lr o* 
Re o* 
Ke oF 
NO 


YES 


oXeecce 


eeoeovne # 
eeeoneeone 


x 
REKKEE LECEKKESESE EE 
* * 
* SET COUNT FOR * 
* DIAL CHANNEL * 
* PROGRAM * 
* * 
SRKEKESCKSEEEEKEEEKEE 

e 

s 

oXecncscesece 


o* 1s 

e* ®8UFFER 

*e USABLE FOR 
we CCwrs 
te 

*. 


*. NO 
eX ecaece 


o* 


Keeeoeoevseeovpevnseeescevueseeeevnevneesenestoes & 


KKK 1LESEKKKEKEKE 
* 


* 
* SET * 
* FLAG FOR THIS * 
* CASE * 
* * 
ROKK KEKKEKEKEEESES 


Terminal Test Module for IBM 1050 


SEKAKESSSES SES TSEKSESE SSE HSSSSOHEKESEKERE 


* 

e 1050 T 
* * 
*(TYPE B LOGICAL TRANSIENT ROUTINE ) : 
* 


ERMINAL 


= 


TEST MOOULE * 


KESKKKESEEKSS ESTEE EERE SOS SEHEEEEEEEEE 


. 
IT JLOT221 ° 
e 
*KEKKKCHIEEEESESEEE ° 
* * e 
* $$8Q1050 * ° 
* * ° 
KEKKKKSKKKKSEKSE ° 
° ° 
e e 
e e 
e e 
° o 
e e 
x e 
o*e ° 
c2 Ke » 
e% ¥e e 
o* 1s *. NC e 
*. THE HEADER o®accoee 
Re VALIO ot 
Ke 0% 
Fo o ¥ 
* YES 
e 
e 
2 
e 
x 
oe 
D2 eo 
o* Ke 
ZERO .* Ke 
Re Pe 3 
oe o* 
Ke o & 
* ONE 
° 
eoecsseccsecs Xe 
e 
ee e 
e x 
e oe ¥e 
e E2 Ke 
e o* Xe 
eYES o* #e 
eooeke DIAL o% 
to oe 
®e ae 
Fe o & 
* NO 


eoccessccceae Xe 

e 

NOTDIAL x 
SHESEKESHERERKSEREKE 


* SET * 
* COUNT FOR * 
* NON-OTAL * 


*CHANNEL PROGRAM* 
* * 
EKEKEKRKEKEEREKSRSEEE 


2 
2 
@eeeaeseoaoodeneveoeen8 


eoeeeseae eaoneen od 
e 


Py 
e GE TCORE x 

e SKKEKKGIEREKESESEEKE 
e * * 
J 

e 


*SCAN WORK AREAS* 
e * FOR * 


* AVAILABILITY * 
* * 
KEEEEKEREKEEKEREKE 


exuee se 


‘J 
H2 
o* 
o* 
*e 


#e 
eo 
*e YES 
eK€een eX 


wAS 
CORE 
*- AVAILABLE. * 
eo o* 
eo 2% 
NC 


xe e808 & 


OEFER 
EERE IZEREEEKEREE 
*SAVE POINTERS. * 
*FLAG THAT THIS * 
* IS A DEFERRED * 
* REQUEST AND * 
* FREE AREAS * 

* 


SKEEEEEREKEEEEEERE 

a 

2 

e 

e 

. 

e 

e 

x 
REKKKIGRE EE SORE 
* RETURN * 
* TO RESIDENT * 
* MODULE * 
CKEKEEKERES EERE 


eeeoesee_evuse@ecsevoeseevesnseseeeveevoevseevesvseasesceovosevevesesevueevsseoeseeeoevewpseevaeseveesvseeseseesvses ee eo eveoeveeeaneeeoeasosvsseeseeoee eevee eee @ 


RE 


START 


x 


SSSSCHISCVS HV OH es 


SET 


* 
e 
*NO-TEST SWITCH * 
+ 
* 
* 


HHEEEEEEEESED EOS 


* 
s 
* 
* 
#*eazeC3t 
* RET 
* TO RE 
* MOC 
*ESR44% 


e 

e 

e 

e 

e 

e 

x 
eestvete 
URN * 
SIOENT ¢ 
ULE id 
SER ESE EE 


* 


* 


* 


+e eH 


HHH HH 


x 
ote 
03 #e 
o* e 
e% MESSAGE *. YES 
e SWITCH TEST «Pe eccesccvsecececece 
Be ao e 
te o ® r 
* NO e 
e ° 
e e 
° e 
e ° e 
x e 
eke e e 
E3 *e e ° 
2% Be e e 
o* *. YES e e 
e COMPARE TEST .*ececccccecsecesecs & eeeeevecece 
¥e es e 
Ke o*% e 
ee. 2% e 
* NO e 
e e 
e e 
e e 
e ° 
x ° 
ote e 
FS Re e 
0% is Fe Cee e 
ot THIS e. NO * * e 
e PATTERN IN e%®eceeeX* HS * e 
¥e USE -% * * e 
*e at KEEE e 
te ot ° 
* YES ° 
e ° 
e e 
o e 
e oXeecssecsccesens 
. e 
x MSGSWTCH X 
UASKHEGCZISEVEGHR ODES REESE GEKERKESEEKEK 
* x * 
1-uUP s * SET uP * 
USAGE COUNT Sd * FOR MESSGAE * 
¢ * SWITCH * 
* * * 
SERSESSAEASHSC OC OS SEEEKKEKEEKKEKEEEE 
e ° 
e e 
e « 
e e 
@eeccccreccccecesvencecceeXeXeccacscercese 
x e 
2 = 
H4 *e e 
o% te. e 
YES .* *. ° 
ewecesecrcececvseenets DIAL ot e 
e Ke o* e 
e te. o* e 
e *e ot e 
e * NO e 
e Py e 
° e e 
° e e 
e eeccecvevcceseXxe ° 
e e e e 
x e NOTOIAL1I X ° 
HEEAKEIZEACRVSERSVGV 6 @ e KEKE IAEEEKEEEKEESE ° 
* ° * * o 
SET ¢ ° * * e 
UP OIAL CCw's ¢ e * SET UP CCWrS * e 
¢ e * * ° 
* e * * ° 
SEKHEKSEKASHEAE SEE e SRESCKEKKESKEKEKEEKEEEK e 
e e e e 
e ° e e 
eeocecoresececces ° e 
e e 
e e 
° e 
° ry 
x e 
EVEKK AKKEKEKERE e 
* RETURN * e 
* TO RESIDENT * e 
* MOOULE * ° 
KEKKKEKKSEE KEKE e 
e 
° 
e 
e 
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@ereovsecsvervee 
x 
2 ®e 
E5S Xe 
NO * Is * 
ecee*e COMPARE DATA 
#e OK o% 
¥e 
ee 


COMPARE 


° 
o* 


Kxeeeee & 


RESKEFERSAASESSSESS 


* * 
* SET UP * 
* VALID COMPARE *# 
* MESSAGE * 
* * 
* 


KEKKKEKEKSTEEKERES 
e 
e 
s 
e 
XKeccecsesces 


eeenonseveseseeooseevoeceseeeoeveveeeseseseaesvsseeees Koo eFeFHOeeGCeeseoeeeeeoseeee 6 @ 


Pe ES 
* * 
* HS * 
* * 
Sees 
e 
2 
Cf 
NOTINUSE X 
SEKKEKHS SEEKS SEEKEREE 
* * 
*SCAN WORK AREAS*® 
* FOR * 
: AVAILABILITY : 
SHKKHSEESESESREKESRES 
e 
= 
° 
e 
e 
x 
oe 
JS Ke 
o* *e 
NO .% WAS eo 
eoeke CORE o* 
#. AVAILABLE: * 
se. * 
Ke o & 
* YES 
e 
e 
es 
es 
x 
EKEKEKHESEEKEEEKE EE 
* * 
*SET USAGE COUNT*® 
* TO ONE. MOVE * 
* DATA TO AREA x 
* * 
SKEKEKKEKEEKKKESETSEEEES 


Chart T3. Terminal Test Module for IBM 1060 
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* * 
* 1060 TERMINAL TEST MODULE : 
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*(TYPE B LOGICAL TRANSIENT ROUTINE ) 2 
* 
EECECESEEEEEEEEEKEESESEREREHEEEESEEKES ES 
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*EREH[ZE4KEEESERE 
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e @eeeeteveeveveneece 
x e e 
ot. s x 
c2 #. ° HOESECIESEEREEESEE 
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eeecenececccesnacsaeXe THE HEADER o* e * FLAG FOR THIS * 
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° *eo o ¥ o 4OE4EESHEKEKEEEEE 
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e e e e 
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x ° SEKEKESHSEEEKEREEE ee E3 Ke e E4 +) e 
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Ves es * AVAILABILITY * Ke cCwrS «® ee *. USE o* e * MESSAGE * ry 
* * ¥e oe ee Be Pe e * * ° 
REBRKKEEKEKEEEKEKEK Ke 0 ¥ ee Be ot e KEES SHKEECKEKEKE EE ° 
e * YES 2 s * NO ‘e e e 
e e e e se = a e 
e epeseneneoseeose e e eecceseveccesneccsesceveccseXe 
e e e a e 
@eneecpaaeeeneevenocasoeasz eee en eae se e gseeeeoeaoneovenv ee e 
x 7 se se e 
o%e. ° x x MSGSWTCH X 
G2 Fe ° SHEKKGIERESEEEKEK ROESSEHOSEKEEKSKESEE BEEESEGHEEEEEKEEKEE 
o* ¥e ° * * * * * * 
o* WAS *. YES e *SCAN WCRK AREAS* * 1-UP * * SET UP * 
eo CORE eKeccces * FOR x * USAGE COUNT * * FOR MESSGAE x 
*e AVAILABLE. * * AVAILABILITY * * * * SWITCH * 
®e o* * * * * * * 
Fo. o % EEE EEEKESEEEE ROO OKEKEEEESEEE VEKKKEKEKHEKERE KE 
* NO ° ° e 
oe oe 2 s 
e e = 2 
* e ° e 
eXecccvesncece e eecersecesaa Xe e 
e e x eo dl e 
DEFER x ° ee e SETCCwW x ° 
PHKKKKHS EERE EEKES e H3 #e e RHKSSCHAEEEREKEKEEE e 
*SAVE POINTERS» * e o* *. ° * * e 
*FLAG THAT THIS * e NO .* WAS #o e * S&T UP DATA * e 
* IS A DEFERRED * eoccce*e CCRE 0% e * CCW FOR THIS * ° 
* REQUEST AND * *®e AVAILABLE .* e * PATTERN * e 
* FREE AREAS. * #e o* e * * ° 
BEEK ESEEESEEEK *. of e KEKSSOREKEKESEKEKEE o 
e * YES e ° e 
e e s e e 
e e e o e 
e e e e J 
e e e eoXeeeeeseecevsenesececeexrneseooe 
e e oe °° 
e x e x 
x SEKEKIISEROEKECESE e KOSS FORE KEESEEEE 
EEK IZ EEKEESEEEE * * e * * 
* RE TURN * *SET USAGE COUNT* e * * 
* TO RESIDENT * * TO QNE. MOVE x e * SET UP CCwrS * 
* MODULE * * OATA TO AREA * e * * 
EKKKEEEEEEE EERE * * © * * 
PER SES ESE SEE TESS SE | e EEKSESCOCOHHEKERERES 
e e ry 
e e ° 
eeceneenvevneneece ° 
x 
SHSSK EOOKHESKESE 
* HE TURN *¥ 
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Chart T4. Terminal Test Module for IBM 2848/2260 
CO PSSSSST PATS eee eee Le eT eee e ee ee 
s 
* 2848/2260 TERMINAL TEST MOOULE : 
+ 
*( TYPE 8B LOGICAL TRANSIENT ROUTINE) : 
* 
SHKHESKKKESEHSEKEEKEHESE HEISE S OH HEEEKEKERESE 
IJLOTS21 
*XESEH2]EESSE TEESE 
* * 
* $$802260 * 
* * 
PEELE EE SES ES TS S 
e 
e 
e 
e 
° 
e eeveveneeeseon 
x e 
oe e ote 
c2 Ke e c3 te 
e% *. o o% *. 
YES o«% REQUEST . o* *. YES 
eoee*e ADDRESS TEST « ® e SeWRITE-AT—-LINE Kec cecvececvceccacceneneeeeesceeeseenesesevesesseoce 
° Be. o*% e *e TEST -* e 
e Fe o * e Re o% e 
eo Be 0 F ° Re 4 e 
° * NO e * NO e 
e e e e e 
eo ° ° e ° 
e e e e @ 
e e e e eeeeeeeeveseose e 
e x e x e ° 
e o¥e e ote e REQADDR X LINEAOOR X 
e D2 *. ° o3 . e KSEEKKOSKSEKKEKEKES RKECKEDH OEKEKSESTSE EE 
e o* ®e e e% e. ° * MOVE MESSAGE * * * 
XYES o* Ke ° eo REQUEST *. YES e * TO INPUT. * * ADJUST * 
eeee*e FORMAT ONE .* * *e ADDRESS TEST «<tecccee *CONVERT OC + DS* * DATA POINTER * 
° Re o* e eo -* * ADDRESSES FOR * * AND COUNT * 
° oe o* ° Re o* * MESSAGE. * * * 
° *e ot e He ot REEKKEKEKERESEEEKSE EEEKEKEKEKEEEKERE 
e * NO e * NO ° e 
o e e e e ° 
e e ° e ° e 
e e e e e e 
s es e e e a 
e s e x e os 
e x e eo %e e s 
2 RKEEKEDEKEKREEKEKE e E3 ee. e ° 
e * CCNVERT * ° ot +. e ° 
° * AODRESSES % ° e* MESSAGE *. YES ° e 
e * AND PUT IN * e Be SWITCH TEST ee ccccccansesscoeeXe e 
° * BUFFER * ° Be 2% ° e 
e x * e te % Ad e 
e EERE KEKE e Be ot e e 
° ° ° * NO e e 
e e e e e 2 
eeovcvecscceeXe e e ececcseccccsecccecceasceccesXe 
e s e & 
° e ° eeeceseeneene e 
x ° x ° ° 
oe ° ete e COMPARE ee ° 
F2 eo . F3 +. ° Fa te e 
o* ts Ke . ot e. e o* *. ° 
NG e%* BUFFER Fe e ot *. YES ° o* IS *e NO ° 
eecceseceseccsesee*®s USABLE FOR ot . *eCOMPARE TEST e#ecesce ®WeCOMPARE DATA e®ecevscscsevacceeXe 
° *. CcCh*'S .% ° eo 4 Re OK o* ° 
e Ke o* e Be .® Ke ot e 
. Ke o* e Be o% Ke ot se 
ry * YES ° * NO * YES e 
e es s e e @ 
e = es = s e 
a e e e es eo 
e se e e e e 
s s 2 x es os 
GETAREA xX TESTLINE X e oe. x ° 
WHEEKEGLEEEREEEEES REKKEGCAKSEEEKEEEREK ° G3 *. REKEEGAEKKERKEEEE o 
* * * * e o* Is *. * * ° 
*SCAN WORK AREAS* * SET * e o% THIS *. YES * SET UP * ° 
* FOR * * FLAG FOR THIS * e *%e PATTERN IN eK®ecccce * VALID COMPARE * ° 
* AVAILABILITY #* * CASE * ° eo USE o¢ e * ME SSAGE * e 
* : * * * e #e o% e * * ° 
KEKE EHEKEEKEKEEKSE REKEEEEKEEEREEEEE e Bo 2% ° KKKKEEEKEEKEKKEKEK e 
° e ° * NO e e eo 
° e e e e ° e 
e aeeceeccecacseeXe es e eeevecescocacccccecccoecesesXe 
e e ° e e 
e e e @eesoteeanvene ee e 
x e e eo es 
o*e e x x x 
Ht *. e SHKEKHZIHHOSC COE HSE REKKKHAKEKSEKKEEEKE RECKKHSKEKEREKKE SEE 
o% #e e * * * * * * 
o* WAS *. YES e *SCAN WORK AREAS* * 1—upP * * SET UP + 
*e CORE eK eccccseseccecevecccenccscneccecene * FOR * * USAGE COUNT * * FOR MESSAGE * 
*eAVAILABLE .* * AVAILABILITY * * * * SWITCH * 
*e o* * * * * * ; * 
ase SHEREHEESCEEHO CHEE KKKKEKKEKEEKKKKEEKE REKKEHEEEEKKETESEKESE 
e e e 
e e e e 
e e e id 
@ e es oe 
eX ewcvescccce e eoccccecnecXeaXeceseccesaccecseaseeesesee 
e x e e 
OEFER x ° oe e x 
EEREK) LEREKEKERRE e J3 *. e CHEESE IAEREEKEKEEE 
#SAVE POINTERS» * ° e* ee 7 * * 
*FLAG THAT THIS * ° NGO o% WAS *. ° * * 
* IS A DEFERRED * CoeereccecccrceccosecacecscesescnveXe CORE * e * SET UP CCWwFrs * 
* REQUEST ANDO * *eAVAILABLE.* ° * * 
* FREE AREAS. * ° a e * * 
KKAKEKEKEKEKEEEKEESE te o & ° EEKKKKKEKSKEEKEEES 
e * YES a e 
bd e e e 
hd e ° Cy 
= Cy e ° 
bed e e e 
* ° ° 2 
2 x e e 
x SERKEK ISAACS SC OOH HK e x 
CHEKK LEREREKEKEK * * e SEEEEKAKKEKRE EERE 
* RETURN * *SET USAGE COUNT* e * RETURN * 
* TO RESIOENT * * TO ONE. MOVE * e * TO RESIDENT * 
* MODULE * * DATA TO AREA * ° * MODULE * 
KKREREKEREREEE * * ° KEKESKEKKKESEEKEKE 
EREKEEEKREHOO HOH EE e 
e e 
@eeseeeaense2e2ea2ec2e2@¢28238020 
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Chart T5. Terminal Test Module for IBM 2740 
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* 2740 TERMINAL TEST MOOULE : 


* 
*( TYPE B LOGICAL TRANSIENT ROUTINE) : 
* 

0EFEESEESESHEEESESESESEESEEEREEEEEESSE EES 


ESET EHEHGEEESEESSEEEEEESHEEKESSEESRE SSE ES 
* 


IJLQT421 
$4468 344480844% 
* * 
* $£802740 * 
s + 
PES SESE ESET ES FE FS 
© 
e 
e 
e 
e 
eceeeeneeceacesn ° 
° e x 
GE TAREA x e oFe 
BESKEKC2AKEHEEEEBES e C3 *e. 
% * o ot 1s Be 
*SCAN WORK AREAS* ° NO «% BUFFER Ly 
* FOR * ecceee*e USABLE FOR o* 
* AVAILABILITY * Be ccwes o* 
* * Re o* 
OHKECEREEEEEEESESES Heo o% 
e * YES 
e e 
e s 
e e 
e@ e 
x e 
ote x 
02 Be PES ES TORE SEE SE ST SS | 
o* eo : * * 
NO .* WAS ®e * SET * 
Coe rccncesecvsecocce ke CORE o* * FLAG FOR THIS * 
° *®. AVAILABLE. € * CASE * 
s ee 2 t PES SSS ESE SE SE SE ES SF 
oe es e 
es e eo 
eo e@ e 
eXeccensccsene wececcceccesececescoccccsseXe 
e es 
OEFER x ° oe 
ROEKKKE 1 KEEKKEEE EE e EZ *e 
*SAVE POINTERS» * e o% Ke 
*FUAG THAT THIS * e e* MESSAGE *. YES 
* IS A DEFERRED * e Be SWITCH TEST e® ec ccccreeseccccscceeeenescesesecceneeseeeeece 
* REQUEST AND * ° oe o* ° 
* FREE AREAS. * ° Be o* ° 
BHOEEKEEEEEEEESEEKSEE ° He 2 F e 
e e * NO ° 
° ° ° e 
e es s es 
e @ ° e 
e eo a @eensenavnennee02 8 a 
° e x x e 
eo ° . ote e COMPARE .#. ° 
fi 7 x ° F3 te e Fa te e 
ee ; CEKEKF LEKEEEEKESE e o% ®e e o@ *e e 
Mo? i * RETURN * e e% *e YES e «# Is *. NO ° 
NG a * TO RESIDENT * e *e COMPARE TEST ce ecccee *.COMPARE DATA ce®eccccccccccecsecaXe 
ae * MODULE * ° #e o* +. oK o* e 
EKGCKEEEKEEEEKE e #e o* e. o% e 
e Be o% Oe. o* e 
. * NO * YES . 
se s es oe 
° e ° e 
e e ° e 
e « « ° 
e x e e 
. oe x MSGSWTCH X 
e G3 *. SESS OCGCASESEEKEEERE #SEEEGHSESEHRESETECSE 
e o% 1s te. * *x * * 
e NO .*% THIS Ke * SET uP e * SET UP * 
° ecscenecccesecceccee¥e PATTERN IN o* * VALID COMPARE * mm FOR MESSAGE * 
r e #e USE o* * MESSAGE * * SWITCH * 
. e Be eo * * * * 
e Py Be « * SHS OOH EKEKEKESSE SHKKEEKHESEESEHEKETEE 
° ° * YES ° e 
es 2 se « e 
eo e oe e e 
eo e e e s 
e e s e = 
e a e e e 
e x x eo 2 
e *EEEKEHOEEEKESEEREE 9O4ECEHZESEESEHEEERE ° r 
e * * * * « e 
e *SCAN WORK AREAS#* * 1-UP * e ° 
° * FOR * * USAGE COUNT * ° e 
e * AVAILABILITY * * * e e 
° * * * * ° e 
e SEEKS EKEEEEKE EKREKEEGHESEHEEESRE . e 
e e ° ® 
ea * e e e 
e e e Ld e 
e e e x e 
e x Pee eccc cea aeXeXee eee SOSH EOSHSSSE SHES SHOESEEOOHOHESESOEOSERECOOEOOO 
« e e 
e oe e x 
e J2 oe ° PERE SAMRESE EES ETE SF 
* o% ®e e * * 
° NO .* WAS Be e * SET UP CCwr's * 
ececee ¥o CORE 0% ° * BY FEATURE(S) * 
*e- AVAILABLE - % e * ON TERMINAL * 
®e o*% e * * 
Ke o * e SHES TERESEEEEES 
* YES e ° 
e o 
e @ e 
e e e 
s es cd 
° e ° 
x ° ° 
RERKEKZEEESEESESCERE e x 
* * e OOK 3EEE4HEHES 
*SET USAGE COUNT? * * RETURN * 
* TO ONEs MOVE * o * TO RESIOENT * 
* DATA TO AREA * ° * MOOULE * 
* * e PES EEL ER EES FEF FE 
EEEERERGEESERERERS e 
e ° 
e e 
e@eerececcseececece 
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Chart WA. 


Audio ERP Message Writer Routine 


ok OR A 22 tok tok tok tok 


x * 
* I JLOQWA * 
* * 
Sao tokio dak dog dogo 
x 
Be AO RB De aR he a ak a ak ok ak 
* GET ALCB * 
* ADDRESS FROM * 
* INFORMATION * 
: BLOCK : 
AOR CR aR Bok a a dake kako i ok 
x 
HRA RRC Dk a aa a a 
* * 
* GET LOGICAL * 
* UNIT QROER * 
: OF THE LINE ; 
Se RRR teak Raat a ek ke ak ak ak ak 
x 
D2. &. Ok sok KD Zt ae kok ee 
«* AUDIO *e * SET UP THE * 
ERP *. NO * THRESHOLD * 
*. MES SAGE oKecceeee eX ERROR * 
« CODE o* * COUNTERS * 
x, x MESSAGE * 
x, 3% Tee ESS Se ees ee | 
*YES ° 
xX x 
He he eee ED he ae 2 ae ake ake oe a ae WR AE BRK KH 
* * * 
* SET UP THE * * GET CCB * 
* ACCURATE ERP *eecceeeeX* ADDRESS OF * 
: MES SAGE * * SYSLOG : 
Sop RR aR to ok kok a ak dak ak ee T SCL CCS SS ee Soe 


eo 


Meo oe 8 


4k FFB RR ek HO 
HKRRKE XCPRREK 
* WRITE ON * 
eSYSTEM CONSOLE 


* * 
RH 


ee eeee 


4K G 3a itotot te 
* * 
x RETURN * 
* * 
AGI OR ROI It 
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Chart Wi. Message Write Routine (Transient) Phase 1 





ARICA ROR i ait 
* 


* 
x TJLQW1 x 
* * 
eR ae aC fe abe ake ae aK 2h he ah he ae 
x 
aXe. Xe 
Bl * HK RK KB ee RK he XK he B3 *, 
* mS x x ox x, 
. ERP *. YES x *x o* SEND TO *. NO 
*, MESSAGE eK eccccecce ce X*SET UP MESSAGE Kee eee 66 eee OPCTL OS ag ecetee lea eee Weta ee: 
s * x * *. TERMINAL . . 
*, * * * *, x é. 
x,  * ROR Fe Kk ROR 2h eae oC ake ei 2c xo ie 
* NO * YES a 
. x 
Cl Ke, MHC D Me Re Xe aK aK Ko He ere RK CF 2k ee kK eK ee RRC Go Xe ak fe a oe aK a eo 
x ° % * *SET UP TO SEND * * * 
MESSAGE *,. YES * FETCH PHASE * * MESSAGE TQ * *SET UP TO SEND * 
*, NUMBER OVE oXecccceeeX* 3 * * OPERATOR % * MESSAGE TO * 
x, 10 ‘s * * CONTROL * *SYSTEM CONSOLE * 
x, * x * % TERMINAL x x x 
Ns fe hk eo ke ie kk ek WR Re KK A eK oe ok oe ok oe Whe ae ate ak age Re a ae 2K fe oe a afc ok ake ok 
x NO e e 
e CNS SS ORS ESOS Oe RAS 
xX 
MED] KK 2 mK OK RK KE aK aK A ye Ke he oh ake eK OK XK ae oe 
* x 
* FETCH PHASE * * x 
* * FXCP 
5g * 
x * 
We he ate ae oe he ke ote ok Me ke eK ee KK ok kK ok oe 


Ke te te ee 


Aok ROK E 2 koto dot kak ak 
* RETURN TO * 
. CALLER P; 


He RR RO i ie fc 
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Chart W2. Message Write Routine (Transient) Phases 2 and 3 


tek Rok AD ak te kok ok ak ak gree PAGE ETS ES eee 
* * 

* TJLOW2 * * TJLOW3 x 
x * * * 
2 2 ok ie ae ake fe ak ok ae ke a ok ak We Re ae aC oe Re ae ake ae ae ie akc 
X x 
He AR he Xe He BD Xe He he he Ae he Ae He he He RK eR BG He 
* * * * 
* SET UP ERROR * * SET UP ERROR * 
* MESSAGE : * MESSAGE * 
* * * * 
BRC he ae ee at i he ae ae ee of ae ok eRe ae ee ote ae ak ae at ae ae ak ie ak ae 
x x 
He RRC 2 Fe feo a ak Xe a ok eK a ek a CG i i of ake ee i ak oe 

EXCP EXCP 
Mi me ee ee ste ae ee ee x DK a ae ae ee ae me me ee x 
WRITE MESSAGE WRITE MESSAGE 
TO SYSTEM * * TO SYSTEM * 
CONSOLE CONSOLE 
He Xe ee he ae 2c ok ake a ake ie We Ke he He he 2h oe ace a a ok 
X x 
Re DL) De Xe Ro ek HR OG KKK KK KK 
x WAIT x * WAIT x 
*COMPLETION OF * *COMPLETION OF* 
* WRITE * * WRITE * 
* OPFRATION * * OPERATION x 
* * x * 
We ie AK fe 2c 2c ae ek ok We eo oe ak ek ek 
x x 
EK Oo a ae ak ae ok RK F G2 2 ok oe Xe ok 
* x * * 

* x * * 
* CANCEL JOB * * CANCEL JOB * 
* * * x 
* x * x 
ee i ok i ee ok eK Keo ok ok KK 
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Chart XL. 
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C4 
QPOST 
C2 POST PREV-BFR 
FETCH (GET) TO RETURN 
$$BQCNCM BFR Q IF NOT 
DUMMY 
(=) oe HIS 
T 
N 
EXPEDITE 2 
QUEUE 
E3 
ACCESS PQ/DQ RELEASE ANY 
DTF FROM BERS IN CORE 
VECTOR TABLE QUEUE TO AV, 
CHAIN BFR QUEUE 
F3 END ANY 
YES OF PQ/DQ BFRS IN CORE 
CHAIN QUEUE 
G2 GAs 
SVC 22 G3 SET DASD- 
THIS PROCESS QCB 
ENABLE DIF TO BE QNRA FIELD TO 
INTERRUPTS REMOVED FIRST UNPROC 
HDR IN CORE Q 
YES 
Hs (3) 
2 
FETCH REMOVE THIS 
$$BEOJ3 pA 
CHAIN 
J3 
1S THIS PQ 
PQ OR DQ 
DIF 
DQ 
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REMOVE BRB IS REMOVE LCB 
FROM DISK I/O LCB FOR YES FROM DEST- 
OR ACTIVE DQ SENDING INATION QCB'S 
BUFFER (PUT) SOURCE LCB 
QUEUE CHAIN _ 
NO 


GET ADDR OF 
BUFFER IN 
CORE QUEUE 


BS 


C5 


DUMMY 
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ELEMENT 


YES 


D5 


ADD COUNT 
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PROCESS QCB 


G5 HEADER 
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H5 


BUMP COUNT 
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Chart XM. 


QTAM Cancel Routine (Phase 2) 
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DISABLE 
INTERRUPTS 


CNCLCTL 
C3 


EXCP WRITE 
THRESHOLD 
COUNTERS 


CONTINUE 
D3 


ACCESS 
PQ/DQ DIF 
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REINIT 
F4 


REINITIALIZE 
QTAM READY 
QUEUE IN 
SUPERVISOR 


LOOPX 
G4 


ZERO QTAM 

ORD IN 
COMMUNICATIO 
REGION 


EXIT 


H4 
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ENABLE 
INTERRUPTS 


a FETCH 
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Chart Y1. 





*ENTRY FROM 
SUPERVISOR 


Bl 
ISLQTA 


cry PCl, 
CHAN. END NO 
AND DEVICE END 








~ TOGETHER™ 
YES 
COUNT NO 
EQUALS 
RESIDUAL 
COUNT 
YES 
E2 
E] SUPRESS PCI 
INTERRUPT No CONDITION 
CCW THE FIRS P| AND RETRIEVE 
READ THE REAL 


CCW INTERUPTED CCW 


F2 
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SUPPRESS PCI 
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WITA Line Appendage (Part 1 of 3) 


B4 
CHECKID 


C4 
IDENT TO NO 
BE CHECKED 


YES 


D4 


RETURN FROMN NO 
BREAK IDEN 


YES 


E4 


YES 
IDENT OK 


NO 


F3 


4 
IJLQLA ERROR 


RETURN 


NORMAL 
RETURN 


D5 


GET ADDRESS OF 
BREAK IDENT CCW 


E5 
NORMAL 


RETURN 
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Chart Y2. WTTA Line Appendage (Part 2 of 3) 
re TAHIO- 
re P IJLQLA A3 
ISTSEN INCREMENT Se anine ~~ 
DATA CHECK LETTERS SHIFT 
COUNTER 
YES 
B3 
ee BI CLEAR 
DATA CHECK HALTIO 
-FLAG 
ENTRYLA 
es C2 C3 
ee YES hare YES CE, DE NO 
COMMAND ON LINE ONLY 
NO YES a 
C4 
NODACHK 35 
Ai D3” HAS 
RETURN 
YES NO 
NO TIME FROM BREAK WRITE BREAK 
OUT CCW 
YES 
TACONT 
E3 
ee ies : UCHK OR SAVE ADDRESS 
OR PREPARE < exc ON OF INTERRUPTED 
COMMAND WRITE CCW CCW 
CONTENTION 






NOTOUT 
Fl F2 F3“IDENT 
END OF 
NO EXCHANGE 
LOST DATA < IDENTITY <== oe oe 
SS aad PREPARED 
G2 
LINE vee 
COMMAND SENDING 
NO 
NORMAP TARECVE 
H] H2 TESTCHAR 
SUPPRESS RETRIEVE H3 
TRANS ERROR THE LAST WRU LAST NO 
(NORMAL CHARACTER CHARACTER 
CONDITION) RECEIVED RECEIVED 
YES 


@) | 
‘7 TIME OUT NNO 
ON LINE 


YES 


K1 * ENTRY FROM 


RETURN TO IJLQEP TO 
IJ LQEP 


INTERPET 
SENSE BYTE 
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a CLEAR HALT 1O 
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GET RESTART 
ADDRESS OF 
READ CHANNEL 
PROGRAM. 
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Chart Y¥3. WTTA Line Appendage (Part 3 of 3) 
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ENDCHAR 
NOTEXT 4 . 
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Chart 00. Receive Scheduler Routine 
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Chart 02. End-of-Poll Time-Delay Routine 
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YY 


Bl 
LINE YES 
RECEIVING 


NO 


Cl 


INITIALIZE BRB 
AND LCB FOR 
WRITING ON 
DISK 


DI 
GET ADDRESS OF 


DISK 1/O QCB 
FOR POSTING 


308 


BRB Ring Routine 
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Active Buffer Request Routine 


04 
B3 


B3- FIRST 
BRB IN RING 
FOR RECEIVE 


YES 


C3 


REMOVE BUFFER 
FROM AVAILABLE 
BFR QUEUE ECB 
CHAIN 


D3 IS 
YES “THIS DUMMY 
LAST BUFFER 


NG 


E3 
GET PARAMETERS 


FOR BFR-BRB 
ROUTINE 


B2 


NO 


B4 SEND NO 
REQUEST 


gq ©& 


GET NEXT BRB 
ON ACTIVE 
BRB QUEUE 





C4 








YES 


63 SEE NOTE 






£4 
PRIORITY 
EQUAL 


E8 








NO 


F4 


MAKE PRIORITY 
EQUAL E8 


NOTE: BRB IS CODED TO LOOK LIKE A QCB. 
IN EFFECT, AN EXIT TO LIFO LINKS 


BRB'S TOGETHER 


-OTAM Charts 


309 


Chart 05. Available Buffer Routine 
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Interim LPS Routine 


EKER 
*xO7 * 
* AZ 


+ 


eTNANIA 


eO7 ® 
* C3 eX. 
* x y 
RE ° 
x 
RRR KC BRK aH 
% ¢ 
* GET THE 
*XAULRESS OF THE ¢ 
a LPS QUEUE 4 
BS ‘ 
a RRR RK KK HC 
HK HK : 
#07 *& Py 
* UB FoXe 
x" * . 
AE AS Xe Xe é 
x 
296 BARK L) 3S RARE EL 
Px4 i 
* SFT LOW ¢ 
*x PRIOKITY IN + 
* HUFFER ‘ 
& y 


Hoke ROK ROR oR ea A 


Mee ee oO oO 


ae Rea Nf Bae ds Re 
x 60 2 
* TU SUPERVISOR © 
3c Q & 

ae ok a Re a ak 


312 DOS OTAM Program Logic Manual 


XK 


Chart 09. Qmover Routine 
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Chart 10. DASD Destination Routine 
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Chart 12. Return Buffer Routine 
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Chart 15. LPS Control Routine 
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Chart 16. Buffer Recall/Cleanup Routine (Part 1 of 2) 
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Chart 17. 


Buffer Recall/Cleanup Routine 
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Chart 18. Free BRB Routine 
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APPENDIX A: QOTAM QUEUES AND SUBTASKS 


QUEUES 


ACTIVE-BUFFER-REQUEST QUEUE 


QCB: Preassembled in the Implementation 
module (IJLQIP); labeled IJLQIP71. 


Element Chain: Dynamically created. An 
element appearing on this chain is an 
active Buffer Request Block (BRB) 
representing a BRB ring. The ring is 
formed by a transfer-in-channel address in 
each BRB pointing to the next BRB. The 
element chain, which is distinct from the 
ring, is formed by the link address in the 
BRBs in the chain. BRBs are posted to this 
chain by the BRB Ring, Disk I/O, Line PCI, 
and PUT routines. 


STCB Chain: Limited to the STCB for the 
Active-Buffer-Request subtask. 


ADDITIONAL-CCW QUEUE 


QCB: Preassembled in the module (IJLOPZ) 
introduced through the appearance of the 
PAUSE macro instruction in the message 
control program; labeled INSERTQ. 


Element Chain: Generated in the problem 
program on expansion of the BUFFER macro 
instruction; the first BRB/CCW is labeled 
IJLQISRT. A chain of special-purpose 
BRB/CCWs used to schedule and contain 
channel commands for the transmission of 
idle characters (or any other 
user-specified characters). BRB/CCWs are 
requested from this queue by the Pause 
routine and are returned by the Line PCI 
and Cleanup routines. 


STCB Chain: May contain the STCB for the 
LPS subtask. Always ends with the STCB for 
the Queue Insert subtask. 


ARU-SEND QUEUE 


QCB: Preassembled in the audio 
implementation routine in the Audio Line 
Appendage module (IJLQAA); labeled 

IJL 2AA5O. 
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Element Chain: Dynamically created. An 
element appearing on this chain is an Audio 
Line Control Block (ALCB) requesting an 
output operation. ALCBs are posted to this 
chain by the audio PUT, ARU-Internal, and 
Audio Line End routines. 


STCB Chain: Limited to the STCB for the 
ARU-Send subtask. 


ATTENTION QUEUE 


QCB: A full word located in each LCB for 
an IBM 2260 Local line group; labeled 
ITJLOLATN. 


Element Chain: Limited to a CCB/ECB 
representing a read request (Attention 
Interrupt) from an IBM 2260 Local. The 
lastelement in the chain is always the 
dummy last element, IJLQIP5SE. 





STCB Chain: There is no STCB chain for 


this queue. 


AVAILABLE-BUFFER QUEUE 


OCB: 
module (IJLOIP) ; 


Preassembled in the Implementation 
labeled IJLQIP72. 


Element Chain: Generated in the problem 
program on expansion of the BUFFER macro 
instruction; the first buffer is labeled 
IJLQIP92. A chain of operationally-empty 
buffers. Buffers are obtained from this 
queue as needed and are returned by the 
Cleanup, Return Buffer, and Line PCI 
routines and the Disk End appendage. 


STCB Chain: Limited to the STCB for the 
Available-Buffer subtask. 


CHECKPOINT QUEUE 
QCB: Preassembled in the Checkpoint module 
(IJLQCK); labeled IJLQCQCB. 


Element Chain: Limited to the checkpoint 
element labeled IJLQCECB. 


STCB Chain: Limited to the STCB for the \ 
Checkpoint subtask. 








STCB Chain: 


COMMUNICATIONS-LINE QUEUE 


QCB: Formed by the first 12 bytes of the 
Line Control Block (LCB) generated in the 
problem program on the expansion of the 
DTFQT macro for a line group file. There 
is one such QCB for each line defined in 
the system. 


Element Chain: 
LCB itself. 


Limited to a pointer to the 


STCB Chain: May contain the STCB for the 
line's Receive-Scheduling subtask and/or 
the STCB for the line's Send-Scheduling 
subtask (or more than one Send-Scheduling 
STCB if separate queues are maintained for 
each terminal). Always ends with the STCB 
for the Qdispatch generalized 
queue-handling subtask. 


DASD DESTINATION QUEUE 


QCB: Generated in the problem program on 
expansion of a TERM macro instruction. 
Labeled QUEUEn, where n is a Sequence 
number reflecting the number of TERM and/or 
PROCESS macro instructions previously 
encountered during assembly. 


Element Chain: 
in a DASD Destination QCB is the relative 
record number of the header segment of the 
first message in the queue of messages -- 
on the direct access storage device -- for 
the destination. In the message chain each 
header segment is linked to the next and 
the preceding header segment through 
internal control fields. Text segments, 
which are also on the direct-access storage 
device, are linked to each other, and to 
the header segment to which they relate, 
through self-contained actual DASD 
addresses. Buffers containing message 
segments are posted to these queues by the 
Cleanup and PUT routines. 


Note that the relative record number 
Simply reflects the sequence (1 through n) 
in which header segments were encountered. 
This number is subsequently converted to a 
relative DASD address, which, in turn, is 
converted to an actual DASD address. 


May contain the STCB for the 
destination line's Send-Scheduling subtask. 
Always ends with the STCB for the DASD 
Destination subtask. 


DCV BUFFER QUEUE 


The “element chain pointer" 


QCB: Generated in the problem program on 
expansion of the BUFARU macro instruction; 
labeled as this macro. 


Element Chain: A chain Of available DCV 
buffers generated on expansion of the 
BUFARU macro generating the QCB. These DCV 
buffers are obtained from this queue as 
needed, and returned by the Line End and 
Line PCI routines on completion of a 7772 
line write operation. 


STCB Chain: May contain the STCB for the 
7772 DCV buffer subtask when no DCV buffer 
is available and one or more audio lines 
are waiting for an available DCV buffer. 
Generally contains the STCB for the Queue 
Insert subtask. 


DISK INPUT/OUTPUT QUEUE 


QCB: Preassembled in the Disk I/O module 
(IJLQODA); Labeled IJLQIP73. 


Element Chain: Dynamically created. A 
chain of BRBs (containing channel command 
words) for direct-access read operations, 
intermixed with full buffers to be written 
onto the DASD. BRBS are posted to this 
queue by the BRB Ring, Get Scheduler, and 
Available Buffer routines and the Disk End 
appendage. Buffers are posted to this 
queue by the DASD Destination routine. 
STCB Chain: Limited to the STCB for the 
Disk Input/Output subtask. 


DISTRIBUTION LIST QUEUE 


QCB: Preassembled in the module (IJLODL) 
introduced by the appearance of the LIST 
macro instruction in the problem program. 
Element Chain: Limited to the dummy last 
element labeled IJLOIP5SF. No element chain 
is developed. Elements (message-filled 
buffers) related to a distribution list are 
immediately transferred to the DASD 
Destination queue for the first terminal in 
the distribution list. 


STCB: Limited to the STCB for the 
Distribution-List subtask. 





INACTIVE-BRB QUEUE 


QCB: Preassembled in the Implementation 
module (IJLQIP); labeled IJLOIP75. 
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Element Chain: Generated in the problem 
program on expansion of the BUFFER macro 
instruction; the first such BRB is labeled 
IJLQIP95. A chain of BRBs of which the 
third and fourth fullwords are effectively 
empty. BRBS are obtained from this queue 
by the BRB Ring routine and are returned by 
the Free BRB routine. 


STCB Chain: May contain the STCB for the 
line's Receive-Scheduling subtask and/or 
the STICB for the line's Send-Scheduling 
subtask (or more than one Send-Scheduling 
STCB if a separate queue is maintained for 
each terminal). Always ends with the STCbL 
for the Queue Insert subtask. 


INTERIM-LPS QUEUE 


QCB: Preassembled in the Implementation 
module (IJLQIP); labeled IJLQIP76. 


Element Chain: Limited to the dummy last 
element labeled IJLQIP5F. Buffers are 
posted to this queue by the Line PCI 
routine and are immediately transferred to 
the LPS queue upon activation of the 
Interim LPS subtask. 


STCB Chain: Limited to the STCB for the 
Interim-LPS subtask. 


LPS QUEUE 


OCB: Preassembled in the Implementation 
module (IJLOQIP); labeled IJLOIP77. 


Element Chain: Dynamically created. A 
chain of empty buffers, to be used for 
messages incoming from terminals, 
interspersed with message-filled buffers to 
be processed by the LPS routines. Empty 
buffers are posted to this queue by the 
Buffer-BRB routine. Message-filled buffers 
are posted to this queue by the Interim LPS 
and Line End routines and by the Disk End 
appendage. 


This element chain may also contain 
audio line control blocks requiring 
processing of their input messages by the 
ARU/LPS routines, or requiring issuance of 
an I/O operation, interspersed with 7772 
DCV buffers (if any) requiring issuance of 
a disk read operation. These audio 
elements are posted to this queue by the 
Audio Line End routine. 


STCB Chain: May contain the STCB for the 


LPS subtask. Always ends with the STCB for 
the Queue Insert by Priority subtask. 
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OPERATOR CONTROL CHNGT QUEUE 


QCB: Preassembled in the Operator Control 
module (IJLQOC); labeled CHANGE. 


Element Chain: Limited to a pointer to the 
Operator Control CHNGT OCB itself. 


STCB Chain: Limited to the STCB for the 
Operator Control CHNGT subtask. 


DASD PROCESS QUEUE 


QCB: Generated in the problem program on 
expansion of the PROCESS macro instruction. 
Labeled QUEUEn, where n iS a sequence 
number reflecting the number of TERM and/or 
PROCESS macro instructions previously 
encountered during assembly. 


Element Chain: Refer to the element chain 
description for the DASD Destination QCB. 


STCB Chain: May contain the STCB for the 
Process Queue's GET-Scheduling subtask. 
Always ends with the STCB for the DASD 
Destination subtask. 


RETURN-BUFFER QUEUE 


QCB: Preassembled in the Implementation 
module (IJLQIP); labeled IJLQIP78. 


Element Chain: Limited to the dummy last 
element labeled IJLQIP5F. Buffers returned 
from a GET are immediately transferred to 
the Available Buffer queue. 


STCB Chain: Limited to the STCB for the 
Return-Buffer subtask. 


TERMINAL TEST BUFFER ROUTING QUEUE 


OCB: Preassembled in the Resident Terminal 
Test routine (IJLOTT21); labeled TESTOCB. 


Element Chain: Limited to the buffers 
containing the request for a terminal test. 
The buffers are posted to the queue by the 
Resident Terminal Test routine immediately 
after validation of the test activation 
code. 


STCB: Limited to the STCB for the Terminal 
Test Buffer Routing subtask. 


oO 


ia 
/ 








TERMINAL TEST STOPLINE QUEUE 
QCB: Preassembled in the Resident Terminal 
Test routine (IJLQOTT21); labeled ONLTTOCB. 


Element Chain: Limited to the buffer 
containing the request for a terminal test. 


STCB: Limited to the STCB for the Terminal 
Test Stopline Queue. 





TIME DELAY QUEUE 
QCB: Preassembled in the Implementation 
module (IJLQIP); labeled TIMEOQ. 


Element Chain: Limited to a pointer to the 
Time Delay QCB itself. 


STCB Chain: Limited to the STCB for the 
Time Delay subtask. 


QMOVE QUEUE 
QCB: Preassembled in the Implementation 
module (IJLQIP); labeled IJLQIP70. 


Element Chain: Limited to a pointer to the 
Qmove QCB itself. 


STCB Chain: Limited to the STCB for the 
Qmover subtask. 


SUBTASKS 


ACTIVE-BUFFER-REQUEST SUBTASK 


STCB: Preassembled in the Implementation 
module (IJLQIP); labeled IJLOQIP81. 


Program Entry: Enters the 
Active-Buffer-Request routine at IJLQIP81 + 


6. 


ARU-SEND SUBTASK 


STCB: Preassembled in the Audio Line 
Appendage module (IJLQAA); labeled 
IJLQAA5S1. 


Program Entry: Enters the ARU-Send routine 


at IJLQAA51+6. 


AVAILABLE-~BUFFER SUBTASK 


STCB: 
module (IJLQIP); 


Preassembled in the Implementation 
labeled IJLQIP82. 





Program Entry: Enters the Available-Buffer 
routine at IJJLOIP82 + 6 (alternate label 
BFRREQ). 


CHECKPOINT SUBTASK 


STCB: Preassembled into the Checkpoint 
module (IJLQCK); labeled IJLOCSTB. 





Program Entry: Enters the Checkpoint 
routine at IJLOCSTB+t6. 


DASD DESTINATION SUBTASK 


STCB: Preassembled in the Implementation 
module (IJLQIP); labeled IJLOQIP89. 





Program Entry: Enters the DASD Destination 
routine at IJLQIP89 + 6. 


DCV BUFFER SUBTASK 


STCB: Preassembled in the 7772 Audio Disk 
Appendage module (IJLQAD); labeled 
IJLQAD40O. 


Program Entry: Enters the 7772 DCV buffer 
routine at IJLQAD4O+6. 


DISK INPUT/OUTPUT SUBTASK 


STCB: Preassembled in the Disk I/O module 
(TJLQDA); labeled IJLOIP83. 


Program Entry: Enters the Disk 
Input/Output routine at IJLQIP83 + 6. 


DISTRIBUTION-LIST SUBTASK 


STCB: Preassembled in the Distribution 
List (IJLQODL) module; located at 
LJ LODL + 8 e 





Program Entry: Enters the module at IJLOQDL 


+ 14. 
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GET-SCHEDULING SUBTASK 


STCB: Preassembled in the Implementation 
module (IJLQIP); labeled IJLQIP8A. 





Program Entry: Enters the GET-Scheduler 
routine at IJLOIP8A + 6. 


INTERIM LPS SUBTASK 


STCB: Preassembled in the Implementation 
module (IJLOIP), located at IJLOQIP76 + 8. 


Program Entry: Enters the Interim LPS 
routine at IJLOIP76 + 14. 


LPS SUBTASK 


STCB: Preassembled into the QTAM 
SvcC/Subtask Control routine. A full STCB 
is initialized by this routine as a record 
of entry caused by issuance of a QTAM SVC 
in the problem program. 





Program Entry: Activation of the LPS 
subtask causes the problem program to be 
re-entered at the instruction following the 
Supervisor call. 


OPERATOR CONTROL CHNGT SUBTASK 


STCB: Preassembled in the Operator Control 
module (IJLQOC); labeled CHANGE1. 


Program Entry: Enters the Operator Control 
routine at CHANGE1+6. 


QUEUE INSERT SUBTASK 


STCB: Preassembled in the Implementation 
module (IJLOQIP); labeled IJLOIPS8B. 





Program Entry: Enters the Implementation 
module at IJLQIP8B + 6 -- an unconditional 
branch to the Queue Insert subroutine 
(OSVCLIFO) in the QTAM SVC/Subtask Control 
routine. 


QUEUE INSERT BY PRIORITY SUBTASK 
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STCB: Preassembled in the Implementation 
module (IJLQIP); labeled IJLOIP8c. 


Program Entry: Enters the Implementation 
module at IJLQIP8C + 6 -- an unconditional 
branch to the Priority Search subroutine 
(OQSVCPRI) in the QTAM SVC/Subtask Control 
routine. . 


QDISPATCH SUBTASK 


STCB: Preassembled in the Implementation 
module (IJLOIP); labeled IJLOIP8D. 


Program Entry: Enters the Implementation 
module at IJLQIP8D + 6 ~-- an unconditional 
branch to the Qdispatch subroutine 
(OSVCDISP) in the QTAM SVC/Subtask Control 
routine. 


RECEIVE-SCHEDULING SUBTASK 


STCB: There is one Receive-Scheduling 
subtask for each line; the STCB for the 
subtask is contained in the third and 
fourth fullwords of the corresponding Line 
Control Block. 


Program Entry: All Receive-Scheduling 
subtasks enter the Receive-Scheduler 
routine at RCVSCH. 


RETURN BUFFER SUBTASK 


STCB: Preassembled in the Implementation 
module (IJLQIP); labeled IJLOIP88. 


Program Entry: Enters the Return-Buffer 
routine at IJLOIP88 + 6. 


SEND-SCHEDULING SUBTASK 


STCB: There is one Send-Scheduling subtask 
for each line or terminal, depending on the 
queuing technique selected by the user. 

The STCB for the subtask is contained 
within the third and fourth fullwords of 
the QCB for the corresponding DASD 
Destination Queue. 





Program Entry: All Send-Scheduling 
subtasks enter the Send-Scheduler routine 
at ENQUEUE. 








TERMINAL TEST BUFFER ROUTING SUBTASK 


STCB: Preassembled in the Resident 
Terminal Test routine (IJLOTT); labeled 
TESTSTCB. 





Program Entry: Enters the Resident 
Terminal Test routine at TESTSTCBt6. 


TERMINAL TEST SINGLE STOPLINE SUBTASK 


STCB: Preassembled in the Resident 
Terminal Test routine (IJLOTT); labeled 
STCBKEY. 


Program Entry: Enters the Resident 
Terminal Test routine at STCBKEY+8. 


TERMINAL TEST STOPLINE SUBTASK 


STCB: Preassembled in the Resident 
Terminal Test routine (IJLOTT); labeled 
STPLSTCB. 





Program Entry: Enters the Resident 


Terminal Test routine at POSTLPS. 


TIME DELAY SUBTASK 


STCB: Preassembled in the Implementation 
module (IJLOQIP); labeled TIMEEND. 





Program Entry: Enters the End of Poll Time 
Delay routine at TIMEEND + 6. This subtask 
is dispatched when the Time Delay queue 
appears at the top of the Ready Queue. 


QMOVER SUBTASK 


STCB: Preassembled in the Implementation 
module (IJLQOIP); labeled IJLOIP80. 





Program Entry: Enters the Qmover routine 
at IJLOIP80 + 6. This subtask is 
dispatched when the Qmove QCB appears at 
the top of the Ready Queue. 
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APPENDIX B: QTAM CONTROL BLOCKS 


THE QUEUE CONTROL BLOCK (QCB) 


The QCB, as used in QTAM, is a control 
block containing information on the status 
and contents of the queue it represents. 
There is one QCB for each queue. The QCB 
points to the head of a chain of element 
control blocks (ECB) and to the head of a 
chain of subtask control blocks (STCB). 


The general form of a basic QCB is: 


(ee So ee ie er ee ee 1 
0 | OKEY | QEBC l 
~-------- }-------------------—---------4 
+4|QOPR | OLNK | 
}-~------- {-------------------—-------- { 
+8 | | QSTC | 
arr heen ante Eanes aa REP ees ec ee te REET Red RC ERT ate J 
Note: All DSECT names have the four 





character prefix IJLQ. 


Contents: 


Key (QKEY): A numeric value (1,2, or 3) 


indicating the status of the queue. 
1--QCB is not on the Ready Queue. 


2--QCB is on the Ready Queue and its 
highest priority subtask is ready for 
activation. 


3--QCB is on the Ready Queue, but its 
highest priority subtask is waiting for 
an element and cannot be activated. 


Element Chain Pointer (QEBC): The address 
of the first element control block in the 
element control block chain for the queue. 


Priority (QQPR): Priority of the queue the 
QCB represents. This is the search 


argument for linking the QCB into its 
proper relative position (by priority) on 
the Ready Queue. 


Link Address (QLNK): The address of the 
next item on the Ready Queue. This field 
is meaningful only when the QCB is on the 
Ready Queue. 
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STCB Chain Pointer (QSTC): The address of 
the first STCB on the STCB chain for the 


queue. 


THE ELEMENT CONTROL BLOCK (ECB) 


An element control block represents the 
condition of an element. As previously 
described, QTAM defines three types of 
elements: 


1. Buffers 


2. Communication lines (represented by 
LCBs or ALCBs) 


3. Buffer requests (represented by BRBS) 
4. 7772 DCV buffers 


The first two fullwords of each type of 

element form an element control block which 
contains control information as to the 

current status of the element. The general 

form of an element control block is: rc 


a a a an ae ee a a a 1 a 
QCB address | 


Ae ae Te Oe Pe Oe ee PE | 
link address | 
Sa ag a See J 


p—+-—4 


Key: Always zero when the ECB appears on 
the Ready Queue (to distinguish it froma 
OCB). 


QCB Address: A pointer to the QCB for the 
queue to which the element has been posted. 
This field is meaningful only while the 
element is on the Ready queue, or is being 
handled by the Qdispatch subroutine after 
having been encountered on the Ready queue. 


Priority: Priority of the element the 
control block represents. This field 
determines the relative position of the 
element when linked into the element chain 
of a QCB, or into the Ready queue. 
Priority 255 identifies the last element in 
a chain; this is a dummy element usable 
only as an indication that the end of the 
chain has been reached. QTAM controls 
element priority as required for internal 
sequencing. 


Link Address: A pointer to the next 

element control block in the chain; the ae 
last element in a chain links to itself. 
This field is meaningful only when the Se 








Link Address: 


element control block is linked into the 
element chain of a Queue Control Block or 
into the Ready queue. 


TRUNCATED SUBTASK CONTROL BLOCK (STCB) 


General Form: 


fs eae aca a aaa aa a 1 
|entry | | 
0| code | | 
~-=--=-----}---------=-- +--+ +--+ ~~~ 4 
+4 [priority | link address | 
bei eee a Ie J 
Typical DSECT (IJLQSTS1B0): 
[4 0 ee Me ey ee, tee, 1 
0 | SKEY | | 
~---------- 4---------------------------| 
+4|SSPR | SSTL | 
Cele eee a i a i eee dj 


All DSECT names have the four 
character prefix IJLQ. 





Entry Code: Branch modifier; a numeric 
value (a multiple of 2 greater than zero) 
added, in effect, to the resolved address 
of storage location NRET in module IJLQIP 
to provide the instruction address to be 
branched to when the subtask this STCB 
represents iS activated. Commonly appears 
in the QTAM assembly listing in the form DC 
AL1l (entry - NRET), where “entry" is the 
label of the branch address. 





Priority: Priority of the subtask the STCB 
represents; determines the relative 
position of the STCB when linked into the 
STCB chain of a queue control block. 
Priority 255 identifies the last STCB ina 
chain. 


QTAM sets the priority value of STCBs 
for Send Scheduling subtasks as required to 
support the send versus receive priority 
specified by the user in the DTFQT macro 
for the line group. | 


A pointer to the next STCB 
in the STCB chain; the last STCB in a chain 
links to itself. This field is meaningful 
only when the STCB is linked into the STCB 
chain of a queue control block. 


FULL SUBTASK CONTROL BLOCK (STCB) 


General Form: 


fee ee Dr ee ere eg ee ee re 1 

| entry | | 

0 |code | address of pseudo QCB | 

st ee co ee ae oe ee a ne 4-~——-——~—--—-~-——-—-—-——-—-+-—-—-—-—-—-—— 

+4 | priority | link address | 

SSeS Sree == .ar eer ee 

+8 | | PIB address | 

Starrett nen ee eee Me ee ee ie J 
Typical DSECT (IJLQSTS1B0): 

co ee ee ee ae ee 1 

0 | SKEY | SQCB | 

~--------— }---------------------------| 

+4|SSPR | SSTL | 

fer fon nnn nnn nnn { 

+8 | | SPIB | 

een te aerate mer Ne EF athe ce ee esa is J 


Note: All DSECT names have the four 
character prefix IJLQ. 


Entry Code: Always zero; this enables the 
Exit Select subroutine in the QTAM 
Svc/Subtask Control routine to distinguish 
a full STCB (representing re-entry toa 
program that issued a QTAM SVC) from a 
truncated STCB. 


d This field always 
contains the address of the pseudo QCB 
laheled QSVCQCB (storage location QSVCRDYQ 
minus 8). This enables the Qdispatch 
subroutine to properly handle the case 
where it encounters the full STCB at the 
top of the Ready queue. 


Priority: Used for the same purpose as in 
a truncated STCB. The Entry Interface 
subroutine assigns a priority to the full 
STCB initialized when the DOS Supervisor 
enters the QTAM SVC/Subtask Control routine 
in response to a QTAM SVC. When a full 
STCB is inactive, it always has a priority 
of 255. 


Link Address: [Initially contains the 
address of the next full STCB in the chain 
of full STCBs assembled into the 
SVC/Subtask Control routine. Thereafter, 
this field is the same as for a truncated 
STcB. The last full STCB in the initial 
chain of full STCB‘s is a dummy full STCB 
(labeled QOSVCSTOP) that links to itself. 


PIB Address: When the full STCB is active, 
that. is, it has been initialized by the 
Entry Interface subroutine, this field 
contains the address of the Program 
Information Block (PIB) for the program 
interrupted by the QTAM Svc. At all other 
times, it contains the address of OTAM's 
dummy PIB (labeled QSVCDPIB). 
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DTF TABLE FOR OTAM DTF TYPE DA 


There are eight different types of files in 


QTAM: 
Brea ee s aa ES | ART | 
Direct Access (DA) "00" | DRCT | DTBO | DTB1 | 
}------ ------ +------ +-~---- { 
Checkpoint Records (CK) "O4* | DSBO | DSB1 | DLUC | DLUO | 
| | $_-____ i eee ee ee Sener 4 
7772 DCV Vocabulary (AV) "08" | DCPA ] 
-}----—-—-7--------------------4 
Line Group (LG) "OC" | DTB2 | DDAP | 
— fa---- 4-------------------- { 
Audio Line Group (LG) “10" | DLTH | DMOD ] 
}~-----}----—7~------------ { 
Process Queue (PQ) "14" |] DTYP | DSWT | DNME | 
se Ad Se Ae oe ad 
Destination Queue (DQ) "18" | ] 
poate 
Audio Output Queue (AQ) 10%. | | | | 
—-—-—- 7-1 ---- 1. -_-_] 
The format of the DTF table for each "20" | | DEOJ | 
type is different and is discussed }------ 4————-—~—~—-—-—-—-—-—~—-—~-~—--—~ | 
separately. "24" | DFLG | DVEC | 
}------ 4——---------~---~~--- { 
"28" | DFPH ] 
/ / 
(DTFPH table) 
/ / 
}------------- q------------- i 
"7c" |] DNRF | DDRF 
}-------------}------y------{ 
"80" | DBPT | DCON | DTPC | 
+------------- 41 ~————1—.-- —~— 4 
"gy" | DXNT [ 
/ / 
(DISK FILE EXTENT AREA) 
/ / 
| 
}--~------------------------- { 
"110"| DXNT | 
/ / 
(CHANNEL PROGRAM AREA) 
/ / 
| 
Oe a a ete J 


Note: All DSECT names have the 
four-character prefix IJLQ. 


Figure 10. DTF Table Format for Type DA 
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Contents: 


The format of the DA type of DTF table is 
shown in Figure 10. 


(Sees 5 oS S > fee Se Sew SS eee 1 
| | Length| | 
| | in | a 
|Field |Bytes | Description | 
}-—---— +------ 4~--- ——{ 
| | |The first sixteen bytes are| 
| | |the CCB data incorporated | 
| | jin the DTF table | 
| | | 
{DRCT | 2 |Residual count. | 
jroo" | | | 
{DTBO | 1 |Transmission byte 0. | 
poo2: | | | 
{|DTB1 | 1 |Transmission byte 1. | 
jro3" | | | 
{DSBO_ | 1 |CSW status byte 0. | 
[tour | | | 
ae | 1 al Status byte 1. | 
|" 0 | 

| | 
{DLUC | 1  |Logical unit class. This | 
{| "06° | |byte is always set to | 
| | |x*o1". | 
| | | | 
|DLUO | 1 |Logical unit order | 
{"O7" | | (X¥'nnn'). | 
| | | | 
{|DCPA | 4 [Address of the first CCW in| 
{;*08* | Jjthe channel program area. { 
| | | | 
|DTB2 | 1 |Set to X'40" for DA type to| 
j*Oc* | Jinticate that the next | 
| | {three bytes contain an { 

appendage address. 
| | : | 
{|DDAP | 3 j|Address of the Disk | 
{| *OpD* | {Appendage routine (IJLQDA). | 
| | | 
| | |The next fourteen bytes are| 
e System Interface Area 

| | Jthe Syst Interf A | 
| | Jand are common to all DTF | 
| | Jtables (with the exception | 
[ { jof the DNME field). | 
| | | 
{|DLTH | 1 |The number of double words | 
,"10°* [ jin this DTF table. | 

| | | 
|DMOD_ | 3 |Address of the | 
aie 4 | Implementation l 
{ | |module(IJLQIP). | 
| | | | 
{DTYP | 1 |DTF type code. Codes for | 
j°14° | |different DTF types are: | 
| | | | 
| | | X*"50°=DA, CK, or AV | 
| | | %"51'=LG | 
| | | X*52'=PO | 
| | | X* 53"=D0 | 
| | } X"'54°=LG (Audio) | 
| i {| xX*55*"=AQ | 
 aeeeeen eee Ma cera ct pS eres acetyl RI ed a Ie See No eee J 





aera cory a og ee ee ee 1 
| | Length| | 
| | in | a | 
{Field {Bytes | Description | 
~-----}------ }~----~------~---------------| 
| DSWT 1 |DOS system switches. Bit 5| 
BB os ag | (X°08) is set on to | 
|indicate that this is a DOS| 
| Version 3 DTF. 
| 
DNME 7 |The name of the DTFOQOT macro 
"16" [that caused generation of 
[this table. 
DNME+7 1 |DASD device code. Codes 
"iD. | for different DASD devices 
|are: 
| 
| xX*00*°=IBM 2311 
| X*01*=IBM 2314. 
| 
{End of System Interface 
| Area. 
: 
DNME+8 1 |DASD type. 
“1 E* | 
| X*00*"=DASD Message Queues 
| file 
| 
DEOJ 3 |Address of the user's 
ge Na |end-of-job routine 
| 
. 1 |QTAM flags. Bits 6 and 7 
"248 | (X°03") are used by the GET 


A en ee SO Me ES EE eS ON SRE END eR ON SO ce EE RE EN RO ce SN EN AE RE ES EE A cD ES SS ee ce SE es eS Se oem oe weodhems 


be 


{modules. Other flags are 
{used as follows: 


X"01"=Auto Polled lines 
X*04"°=Input file 
X*08"=Output file 


X°10=DLBL information has 
been initially processed 


X* 0C"=Input and output 
file 


X"20"=Checkpoint flag 
bit. Ina type LG DTF 
table, this bit is 
flipped when the LCB data 
has been collected from 
the LCBs. 


X" 40"=Separate assembly 
X" 80"=Switched lines 

X* 80"=Audio flag for PQ 
type if WU=A,MA,RA, or SA 


is specified. 
Sie ome Nee meee BRO te cae Ronen eee 4 


a eee EE ee ee gees SE gee eee gees see gga eee gees ewe ees eo ee ee ee ee eee eee eee ee ee ee ee gee ee eee eee pee ee eee ee ee Oe gees eee, eee 2 o—eee eee 2 ees SE eee Se eggs 8 eee ce cee ewe eee Oe eee 


-——— — — — — — — 


Appendix B 331 





ee a ae a en OO ea 1 DIF TYPE CK 


Pore ee ae T 
| |Length| | 
| in | | | 
{Field |Bytes | Description | 
}------ ------ }--------------------------- { 
| | | | eeu ab atalin menemumicaree {rs == | Saneamacrses 
{[DVEC | 3 |Address of the QTAM Vector | *00" | DRCT | DTBO | DTB1 | 
j°25" | [Table (IJLQIP5E). | }----—-- 1------ +-——-—-—~—— +-----~- 4 
l | | "O4" | DSBO | DSB1 | DLUC | DLUO | 
{|DFPH | 84 ]This is a DTFPH table | ------- seep ae eee 2 Eee { 
j*28" | Jwholly included within the | "08" | DCPA ] 
| | |DTF table for type DA. | }------ {rn 4 
| | | | "Oc" | DTB2 | DDAP | 
{|DNRF | 8 |These five fields contain | ------- 4-------—----~-—~~--—---- 4 
| thru | |DASD device type constants. | *10* | DLTH | DMOD ] 
| DTPC| | | t------ {----—- 1--------- —-~4 
; | , s [| "14" | DTYP | DSWT | DNME | 
[DXNT | 140 |Save area for the extents | }——--—-——-1--—~-~---J | 
;"s4" | Jof the file on disk | oe {| | 
| | | | ! p------7------| 
{DDCP | 32 {Channel program area e1Cc* 4 | | | 
[410° 4 | {------ 1----—- Ln 4—-———— 1 
t_____— 1-~___— 41——————~—~—--—-—-—~—~—-———-—-—-~—--— -- 4 *20" 43 | DERQ | 
}----~- $------------—------- { 
"24" | | DDSK | 
}----~- 1-~-~~-~-----~------ { 
™28" | DFPH ] 
/ / 
(DTFPH table) 
J / 
| 
foe eae a : (nace Seema wane { 
"7C" | DNRF | DDRF { 
{--—---—--—— $--—-—-7----—— i 
"80" | BDPT | DCON | DTPC ] 
}------------- 1-—————4-—-——— { 
"84" |] DXNT | 
/ / 
(DISK FILE EXTENT AREA) 
/ / 
| | 
}--------------------------- i 
*94" ] DSCP ] 
/ / 
(CHANNEL PROGRAM AREA) 
rf J 
| | 
[-----------------------—-- { 
"BC* | DSWA | 
| --------~------------------ i 
"CO" |] DWKA | 
/ / 
(CHECKPOINT WORK AREA) 
/ / 
l 
feet eae aa aE Ce ean Sree eve ee an oe EN J 


Note: All DSECT names have the 
four-character prefix IJLQ. 


Figure 11. DTF Table Format for Type CK 
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Contents 


The format of the CK type of the DTF table 
is shown in Figure 11. The first 30 bytes 
of the CK type of DIF table are the same as 
those for the DA type of DTF table, with 
the exception of the DMOD field. 


| DMOD 
ae! et Dag 


| 
| DNME+7 
| "17" 


jAddress of the Checkpoint 
Jroutine (IJLOCK). 


|DASD device code. Codes 
|for different DASD devices 
jare: 


X*00°=IBM 2311 
X*O01"=IBM 2314 


DASD type. 


X*02"=DASD Checkpoint 
Records file. 


Address of the error queue. 


{Address of IJLQDA60 in the 
|Disk Appendage module 

| (IJLQDA) . 

| 

|This is a DTFPH table 
{wholly included with this 
|DTF table. 

| 

|These five fields contain 
}|DASD device type constants. 


|Save area for the extent 
J information 


{Channel program area. 


|Size of the checkpoint work 
] area. 


| Checkpoint work area. 


Ace et ME. tenets OE eaten SEED Rien SEED wipes GUS teens GE gegen STE Sy EES eee, ED megane EE Seen SUE Gee SEE epee, HE eee SOE ame, EE ee EO Gee EEN ge STE gyseen SE anes AD AD 
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DTF TYPE AV 


(22S SS SS ee 1 
"00" | DRCT | 
}------ Wont —+ 
"ou" | | DUNO | | 
}------ +------4---------—--- | 
"08" | DAFG | ; 
[------ $———————————-- ~~ + 
"Oc" | DIPM | 
------— [ron { 
"10" | DDFL | DMOD | 
|------ }------7------------ 4 
"14" | DDTP | DSW1 | DFIN | 
b---——- La —— | 
"18" | | 
| [------7------ 1-H 
1c" | | | | | 
| t---——~ {-~-----1------ 4————— { 
"20" | | DEO1 | 
[----—- t-—----—---=--------- { 
"24" | DQF1 | DVT1 | 
Re ae BEM een aS A ee ee AL TON J 
Figure 12. DTF Table Format for Type AV. 
Contents: 


The format of the AV type of the DTF table 
is shown in Figure 12. 


is T 


fo oe anew oe eee em ae ee ee ees ee ee Oe ee 


Field 


kK 


——— H+ 


Length 
in 
Bytes 


fend 


jAddress of the 7772 word 
Jjtable (IJLQWTBL). 


|Logical unit order (X‘'nnn'‘) 


| 
| 
| 
| 
: | 
JAudio flags. Bits 6 and 7 | 
|} (x"03') are not used. | 
{Other flags are used: | 
X*O4"=DCV buffer pool 1ist| 
specified. | 
X*08'=Word table | 
specified. | 
X*°10'=Logging with time | 
stamping specified. | 
X*20'=Initial write (on) | 
or read (off) | 
operation. | 
X*40"=Mode conversation | 
(on) or invitation | 

(off). | 
X*80'=Mode information | 
| 


frre mm cr errs es ee re ee eee ce meee come eee ee ee 
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DDFL 
2 


fm a me mm es rs es es ee es eee es ee ees eee eee cere et eee ee ee ed eee ee em eS cm ee SN SS RS ND ce AD ce cee mene emf 


Bytes 


|Address of the Audio Line 
{Appendage module (IJLQAA). 


{Address of the 
| Implementation module 
| (IJLOIP). 


| 
|Number of double words in 
[this DTF table. 


| 
[Address of the 7772 Disk 
[Appendage module (IJLQAD). 


|DTF type code (X‘'50"'). 
| 


| 
|DOS System Switches. Refer 
[to DA type (DSWT field). 


| 

|The name of the DTFQT macro 
[that causes generation of 
[this table. 


|DASD device code. Codes 
{for different DASD devices 


a 
KX 
1) 


X*00*°=IBM 2311 


X*01°=IBM 2314 


DASD type. 


X*04"= DASD DCV Vocabulary 
file. 


2 RR ED Ee SES eee a SE ge a etme aE 


|Address of the last 
{previous DTFOT file opened 
Jin the message control 
{program or address of the 
juser"s end-of-job routine. 


QTAM flags. Refer to DA 
type (DFLG field). 


|Address of the OTAM Vector 


ea cece cme See ces SEED ame SEES GaREETS OEUNED cen SmmnEEES GEES GESTS qeeseD SEED ene QE ENS SEE eam ERTS ee STE epee ER EEE cee SIRES GOES meme: SEED OER ceempee® SEER cee SED GED GREED SO SO SRE mE egeegen SEED GOURD eggs anne) GEES GRESESS GSES GSES GMCS GUNEOS aman aqeemtS GES 


ND AND ND EN ENE NED ENED AD AED SENS GUND ND GEER GULP Queen CUED ED NBD GEE) GENE ane GED eS ee meee eee 





DTF NONAUDIO TYPE LG paSase eee Sp aca 7 
| |Length| 
| in | | 
|Field |Bytes | Description | 

" aunce saan SS a Aan cierto coe ani "1 -------— $------ 4 a nn { 

"OO" | DLSZ | DLCB | }DLSZ | 1 |Size of the LCB. | 

~----- $--------------------+] jsoo' | | 

"O4' | DCUD | DDIO | l | l | 

-}------ 4+----—--— +~------ +------ }DLCB_ | 3 |Address of the first LCB | 

"OS" | DBFN | DLNO | DPOL | DDEV | \"oi" | {minus the size of the LCB | 

}------+------ 1------ 4------{ | | | 
*O0Cc* | DCUN | DLPS | }DCUD | 1 |Device type code. Codes | 
-}-----—- 4—-——~—~—-—-—-—-—--—-—~—-—-—---— { j"O4" | |are: | 
"10" | DLTH | DMOD | | | | | 
}—~~——-—}—~—-—-—-—~—+—-——-—-—-----—--- | | { xX°01*°=IBM 1030 | 
"14" | DTYP | DSWT | DNME | | | | xX'O2*=ATET 83B3 | 
}------ 1—--———— 4 | } | | x*®03*%=WU Plan 115A | 
"18" | | | { | xX*04"=I1BM 1060 | 
| (------------ —-{ | | | X°05*%=IBM 2260 remote | 
eet (| ] | | | | xX*06"=IBM 1050 | 
~——-+——+----+— 4. .-__--_._-.. J | | {| xX*O7"=ATET TWX | 

"20" | DFLK | | i | X*08*=IBM 2260 Local | 

|------ '------------------- -4 | | {| X*"09"=IBM 2740 (274A) | 

"24" | DFLG | DOCQ | | | | X*OA*=IBM 2740 (274C) | 

}-----—- 4+------ ~------ ~------ { | | {| X*OB*=IBM 2740 (274D) | 

*28" | DTHR | | | | | 1 | xX*0C*=IBM 2740 (274F) | 

—--+---—-— 4—~—-—-—~—-—4+---~-~--4---~--- | | | xX*"OD"=IBM 2740 (2748) | 

*2c" | DMCH | DEOM | DEOT | DWTT | | | | X*OE"=IBM 2740 (2748) | 
-}—-—--—-—- i_-——-— i-———-— i.-_——— 4 | | | X*OF®=IBM 2740 (274G) | 

*30* | | J 1 | X*10"°=IBM 2740 (274H) | 

| | | | {| X"11°=wTTa | 

/ / | | | | 

(START OF FIRST LCB AREA) |DDIO. | 3. |Address of the Device I/O | 

ia / / }"05" | |module for the line group. | 
. | | | | | 
ae L_—________-_-__ J |DBFN | 1 |Number of buffers needed | 
;"08"* | | for each transmission. | 

Figure 13. DTF Table Format for Nonaudio | | | | 

Type LG |DLNO_ | 1 |Number of lines in the line| 

|"09"* | peewee | 

| 

|DPOL | 1 |Polling interval in | 

Contents: j}"OA* | | seconds. | 

| | | 
|DDEV | 1 |Device-access field offset | 

The format of the nonaudio LG type of DTF | "OB" | | for each terminal table | 

table is shown in Figure 13. The System | | | entry. | 

Interface Area is the same as that for the | | | | 

DA type of DTF table with the exception of {DCUN | 1 |Control unit type code. | 

the DMOD field. |" oc" | |Codes are: | 
| | | | 
| { { x*01"%=2701 | 
| | | x*02*%=2702 | 
| | | X*03*=2703 | 
| | | | 
{DLPS_ | 3 jAddress of the user's LPS | 
;"OD"* | [logic for this line group. | 
| | | 
|DLTH | 1 |The number of double words | 
j"10° | Jin this DTF table | 
| | | | 
| | (Bytes 16 through 29 form | 
| | |the System Interface Area. | 
| | |See DIFOT TYPE DA). | 
| | | | 

oN |DMOD | 3 |Address of the Physical | 
: f"11" | {10CS module (IJLQRW). | 
a aes eee ree iS eee Soa ee ee ete a I RA a ec PEO J 
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MCH 
z2c* 


=O 


{Address of the last 
[previous DTFQT file opened 
{in the message control 

| program. 


| 
JQOTAM flags. Same as in DA 
[type of DTF file. 


{Dial out call queue. 


| 

{Threshold values for the 
jJerror recovery procedures. 
| 

| First byte=number of 

| transmissions. 

| Second byte=number of 
| data check errors. 

| Third byte=number of 

{| intervention-required 
| errors. 

| Fourth byte=number of 
| timeout errors. 

| 


{Number of Mark characters 
jrequired before sending an 
joutput message to a World 


[Trade terminal not equippcd 


Jwith the Motor-On optional 
| feature. 


| 

}EOM signal for World Trade 
jterminals. 

| 

|EOT signal for World Trade 
{terminals 

| 

{Flags for World Trade 
jterminals: 


X'01‘°=WRU macro 
instruction present 
in the Send Header 
subgroup of the LPS 

X*O2"=WRU macro 
instruction present 
in the End Send 


X'O4* 
X*'08* 
X*10° 


Not used 


the DTFOT macro 
instruction 


the DTFOT macro 
instruction 


the DTFOT macro 
instruction 
X'8O0'=WTTA line indicator 


Subgroup of the LPS. 


X*20°=IAM=YES specified in 


X'20'=IAM=YES specified in 


X'4Q*=WRU=YES specified in 


em cence nee SR eee SS sores SES aes ES cere, SAD geese SS ees SAS ces SEES eee SS cee GENS cee ES deme See cee ees cme SE ee Se canes SS ery OE epee Se eo ee ee ee ee es gee eee ee ee ee eee 


Mg ace cs ch te tai fs cme oa cenit leet 


cele tain com EIA cadre ER ee ee eee ee oe eee ee ED OEE EE NS NY ES END END SERS ND UY SEED CURED OTN ED RE NERD END ED SES a eRe oes 
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DTF AUDIO TYPE LG 


100" 
"our 
08" 
'oce 
"408 
14° 
1g" 
4ce 
150" 


aed tS 


. a2R* 


wees 
oe 
aut 
‘Ags 
nes 


"uo! 


Figure 14. 


The format of the audio LG type of DTF 


ie es ee ee ee ee ee eee 1 
| DALZ | DIBL | 
aaa qo -aS-= aS SeS SSeS { 
l | DFLA | 
aes | SpnaGas (acca asmaaracaccean | 
{| DAFG | DALN | DCLA | 
a faSSrSe aa acacia { 
| DCUT | DLPA | 
manera (oo a 1 
| DDTL | | 
[ees s== | ee SURG abn ean 4 
| DDTT | DSSW | DFLN | 
Pee ee Poke ee [ a aaa ae eae | 
| | 
Pesce =Seeoes Fess eeaS=sSteS 4 
| | | 
(SS ee Hasse = Paes See + 
| DEJA | 
SoS ca aS Nc a : 
{| DOFG | DVTA | 
oss — aa i | 
| DTRH 
Nase a ci { 
| DPEA | 
[saan Sarees eae eee = 
| DDPA | 
aaa iam ec { 
| DLTA 
fs ee eee = 
| DARQ | 
po Se ee eee { 
| | 
SS ee ee { 
/ / 
(START OF FIRST ALCB AREA) 
/ / 
| | 
Deas el ee Sern ee ae a ae ee ae ee J 


LG. 


Contents: 


table is shown in Figure 14. 


DTF Table Format for Audio Type 


«0 
eo 
oF 

be 


oO - 
8 am 
3 = 
KF a 


e 
~_ 
Bom 

2 


ae 
Pn 


mn 
“2 


ae 
> Fr 
os na 
“2 


EJA 


pe, 


a ee ED SE gS OS Cr ee me eee is ee rs ee ee ie mee ee ee es gee ee ees ees ee 
B 


Length of the input buffer. 
Address of the first ALCB. 


{Audio flags. Refer to AV. 
[type (DAFL field). 
| 


{Number of lines in the line 
| group 


| 

[Length of the address chain 
|buffer or length of the 
{informational message. 


Control unit code 
X*70'=IBM 7770 
X*72"=IBM 7772 


[Address of the user‘s 
|ARU/LPS logic for this line 
| group. 


| 
|Number of double words in 
[this DTF table. 


| 

|Address of the 
{informational address 
| chain. 

| 

|DTF type code (X'54"'). 


[DOS System switches. Refer 
|to DA type (DSWT field). 

| 

|The name of the DTFQT macro 
|jthat causes generation of 
[this tabie. 

| 

| Address of the last 
[previous DTFOT file opened 
Jin the message control 
[program or address of the 
fuser"s end-of-job routine. 


| 

{QOTAM flags. Refer to DA 
[type (DFLG field). 

| 

{Address of the QTAM Vector 
{Table (IJLQIP5E). 

L 


a sa a a a a 4 
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338 


T 
{Length 


Description 


Threshold values for the 
error recovery procedures: 


transmissions. 


Second byte=number of 
hang-up operations. 
Third byte=number of 
errors on read 
operations. 


T 

| 

| 

| 

+ 

| 

| 

| 

| First byte=number of 

| 

| 

| 

| 

| 

| 

| 

| 

| Fourth byte=number of 

| errors on write 

| operations. 

| 

4  |Address of the process 
J|program entry. 


4 |Address of the DCV buffer 
}pool (7772) or address of 
{the Implementation module 
| (7770). 
| 

4 |Address of the line table 
| [JLQLTBL). 


| 
4 |Address of the output Queue 


fp a a me a a et 


DOS QTAM Program Logic Manual 


es Ne Scat ae a es aaa ete Sarees 4 


ee eee ee ae ee ee SS 


oe 





DTF TYPE PQ 


‘ 
700" | DBRB | 
| | 
‘our | | 
| | 
‘08* | | 
| | 
‘oct | | 
foo ee= Fron { 
"10" | DLTH | DMOD | 
|------4------y------------- { 
"14" | DTYP | DSWT | DNME 
}------ 1 --——4 | 
"18" | | 
| Seat iaie ace aaeiaiaaa { 
“1e"" "| | DASZ | 
}------y------4-------------4 
*20* | DMXB | DSNC | 
|------}--------------------] 
"24" | DFLG | DTRM | 
|------}------------------- + 
"28" | DSLB | | 
|------ 4-------------------- { 
"2c" | DPBA | 
|--------------------------- { 
"30" | DCPQ | 
| | 
"34" | | 
| 
"38" | | 
}--------------------------- { 
"3c" | DPNM l 
| | 
"uo | | 
ec {oo a eee + 
"ag" | DCNT | DOVA | 
|------ $--=----------------- | 
"48" | DERR | DFAD | 
|------ }-------------------- 1 
"uc" | DPDL | DPLK | 
}------ }-------------------- { 
"50" | | DSOQN | 
|------ 4—----~4------------- { 
*54" | DAAS | | 
SS 1 a i aac rca aera { 
"59" | | DSWI | 
[------ }------------------- +4 
5c" | | DLIN | 
[------ 4—------~------------ { 
* 60" .7 DGEL / 
fF / 
|--------------------------- { 
"6c" | DGOC | 
/ / 
/ / 
PSs SesSsae 5 Lee aaa ES | 
"7g" | | DGBR | 
|-------------4------------- { 
Ice 2 | 
A ee ae et J 
Figure 15. DTF Table Format for Type PQ 


Contents: 


The format of the PQ type of DTF table is 


Shown in Figure 15. 


The System Interface 


Area is the same as that for the DA type of 
DTF table with the exception of the DMOD 


field. 


DASZ 
aa eg 


DMXB 
see a Yd 


DNC 
"941! 


D I’ LG 
e ? u 0 


D'TRM 
t 25° 


Pe On ce es ee ee ee ee ee ee ee ee es coe ee eee ee Oe ee ee a eg A en ee a OE ee, SS ee ee ee eee 


|Buffer request block used 
[by GET. This field is 
|subdivided as follows: 
Bytes 1-4=BRB word 1 
Bytes 5-8=BRB word 2 


Byte 9=TIC command code 
X" 08* 


Bytes 10-12=Address + 2 
of the DASD Process QCB 


Byte 13=Dummy buffer code 
Xx" 07" 


Bytes 14-16=Address of 
the MS Process Queue LCB 


ED _ee OE OD ees CE a SE Ee ee a ee eee ee oe 


|The number of doublewords 
[in this DTF table. 


| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| | 
|The address of the | 
|appropriate GET module | 
| (IJLQOGR, IJLQGS, IJLOGM, | 
| IJLQGA, IJLQGB, IJLQGC, or | 
| IJLQGD). | 
| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 


| 

| (SYSTEM INTERFACE AREA) 
| 
|Size of the user-specified 
J|work area. SOWA or 

| SOWARU (if WU=A is 

| specified). 

| 
|Maximum number of buffers 
[to be chained into this 
[MS Process Queue (DCPQ). 


|Address of the user routine 
[to be entered when no 
|messages are available for 
[this queue. 


| 
|QOTAM flags. Same as in DA 
[type of DTF file. 


| Address of the user area 
{that is to receive the 
|source terminal name 

| (IJLOTTID). TRMAD or LINAD 
| (i1£ WU=A is specified). 
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iar ala acs to ea a An a ra 1 ees (mneaneleiaaaca a ye ee en ee 1 
| |Length| | | |length| 

| | in | _ | | {| in | oes 

|Field |Bytes | Description j {Field |Bytes | Description | 
2 io ns i... .. 
|DSLB 1 |LCB status. | DSWI_ | 3 |Address of the 

| "28" ] | *59"- 4 | user-provided switch byte 
| | | | | (SWITCH). 

| DSLB+1 jAddress of the source LCB. | | 

{|*29° | | | |Address of the user area 
| | | [ [that is to receive the 

| DPBA | Address of the previous | | |source line name (LINAD). 
| "2c" Jbuffer used. This field is| | 

| Jinitially set to the | | |High priority element 

| {address of DBRB. | | | for immediate dispatching. 
| | | | | 

| DCPQ {MS Process QCB. | [ | Combined QCB/STCB. 

a | | | 

| DPNM [Name of the process program| | [Entry point to imple- 

|" 3c" [entry in the terminal table| | |mentation subtask. 

i jin the message control | 4 ——.— 4———_ ~~~ ~~~ + ~~ — — ~~ — 
| { program. : 

| DCNT j|Count of the characters | 

{*44* {remaining in the buffer i 

| |from a previous GET. | 

| | 

| DOVA JAddress of the user routine| 

,*45* Jto be entered when a | 

| Jmessage unit is larger than| 

| {the provided work area. | 

| | | 

| DERR jReturn code for GET. | 

[*48" | | 

| | xX*OO‘=No error | 

| } X*01‘°=DTF not opened | 

| | 

| DFAD {Address of the user routine| 

}"49* jto be entered when no | 

| |message is available and | 

| [the system is ina | 

| | closedown procedure. | 

| | 

| DPDL |Partition Interrupt Key | 

{*4c°" {| (PIK) for the partition | 

| |containing the last | 

{ {previous PQ, DQ, or AQ DTF | 

| jtable opened. | 

| | 

| DPLK {Address of the last | 

{*4pD* Jprevious PQ, DQ, or AQ DTF | 

| jtable opened. | 

| | 

| DSOQN |Address of sequence number | 

Hing oF Ey jwork area. | 

| | | 

| |The following fields are | 

| [generated only if WU= MA | 

| eae SA is specified. | 

| DAAS [Size of user's audio area | 

{ *S5qt | (SOWARU). | 

| SENS aE cesar’ Secete ee eee nom aR ESE Pe RE eee EOS Oo OD Ae eee J 
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heme comune ceceress SENOS ceceege cee CEE GEESE gees CURED GREEN, “EEE eqanee sEnISE. GUE GED ape OED 








DTF TYPE DQ 


piss 
"OO" | DOCB 
| 
*ou?® | 
| 
"ost | 
| 
"Oc? | 
eee eee 
"10" | DLTH 
Lees 
"14" | DTYP 
es 
"18 f | 
| 
*1c* | 
a 
*20* | DWAD 
aes 
"24" | DFLG 
Seen ae 
*28*" | DSLB 
/ 
/ 
| 
eee 
"4c" | DPDL 
eter 
Figure 16. 
Contents: 


The format of the DQ type of DTF table is 
The System Interface 
Area is the same as that for the DA type of 


shown in Fig 


DTF table wi 
field. 


DIF Table Format for Type DQ 


ure 16. 


th the exception of the DMOD 


(essere = 2 a amen foe ae eee ee 1 
| |Length| | 
hic oe 2h. | —_ | 
|Field |Bytes | Description | 
------ $------}---------------------------4 
{\DQCB | 16 {|The MS Destination QCB. | 
{*00* | |This field is subdivided as| 
| | | follows: | 
| | | | 
| { | Bytes 1-4=QCB word 1 | 
| | | | 
| | | Bytes 5~-8=QCB word 2 | 
| | | | 
| | | Byte 9=Always X‘OO' | 
| | | 
| | | Bytes 10-12=Address of | 
| | | the first STCB. This | 
| | | field is originally set | 
| i | to IJLOIP8C. | 
| | | 
| | | Bytes 13-16=QCB word 4 | 
| | | | 
J|DLTH | 1 |The number of doublewords | 
}"10° | [in this DTF table. | 
| | | 
|DMOD_ | 3 |Address of the appropriate | 
[?1it. 4 |PUT module (IJLOQPR, IJLOPS, | 
| | |or IJLQPM). | 
| | | | 
| | | (SYSTEM INTERFACE AREA) | 
| | | | 
{DASZ | 2 |Save area for count of | 
{"1E° | {characters to be moved from} 
| | |work area. | 
| | t | 
{DWAD_ | 4 |Save area for address of | 
{* 20° | {input work area. | 
| | | | 
|DFLG | 1 |QOTAM flags. Same as in DA | 
"24" | jtype of DTF file. | 
| | | 
{DTRM | 3 |Address of the user area | 
,*25° | |which contains the | 
| | |destination terminal name. | 
| | | | 
IDSLB | 36 |MS Destination Queue LCB. | 
{| "28" | {The last three bytes of | 
| | Jthis area contain the | 
| | {address of the DASD | 
| | {Destination or Process QCB | 
| | |for the current destination| 
! | jterminal. | 
| | | | 
JDPDL | 1  |Partition Interrupt Key | 
|*4c" | | (PIK) for the partition | 
| | | containing the last | 
| | |previous PQ, DQ, or AQ DIF | 
{ | | opened. | 
| | | | 
JDPLK | 3 |Address of the last | 
|" 4D" | [previous PQ, DQ, or AQ DTF | 
{ ] | opened. | 
Loan aieen pelle thea No Be a eh nee eS ae ed 
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DTF TYPE AQ 


ee “7 

"00" | | 

}--------------------------- { 

"our | | 

|--------------------------- { 

"08" | | 

[-------------------------—- { 

"oc" | | 

----- qo77----------------f 

"10" | DDL1 | DPAD | 

}------ ------4-----------—- { 

"14" | DDT1 | Dsw2 | DDT2 | 

oe Bend ne 4 

ie | 

(SaaS ss | ana ene area an { 

*1c™ | | | 

|------------- 4_-_--------- + 

*20" | DASQ | 

ia :, Se aan mane ae | 

*24* | DQF2 | DLNA | 

|------ 4——-—--------------- +4 

*28" | | 

/ / 

/ / 

"4g" | | 

|--------------------------- { 

"4c" | DLNK | 

|--------------------------- { 

"50" 4 DSAV | 

}--------------------------- { 

‘oye | DLMT l 

/ / 

/ / 

}--------------------------- { 

"60" | DOQPA | 

/ / 

/ / 

|-------------7------------- { 

"6c" | ] DBRC | 

|-------------1------------ 4 

sro | | 

Mi a ee J 
Figure 17. DTF Table Format for Type AQ 
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Contents: 


The format of the AQ type DTF table is 
Shown in Figure 17. 


(Se Se = re i ee ee ee ee ee 1 
| Length| | 
| {| in | . | 
jField |Bytes | Description | 
----- 4-4 rn nnn of 
{DDL1 | 1  |Number of doublewords in | 
{*10° | {this DTF table. | 

| | | 
{DPAD | 3 {Address of the audio PUT | 
ios Ne iy | {| module (IJLQPA). { 
| | | | 
}DDT1 | 1 |DTF type code (X'55"). | 
ie | | | 
| | | . | 
{DS stem switches. efer 
{D W2 | 1 | DOS Syst tch Ref | 
i=15° | [to DA type (DSWT field). | 

| | 
{ DDT2 | 8 {The name of the DTFOT macro| 
} "16° | {|that causes generation of | 
| | [this table. [ 
| | | | 
{DASQ | 4 |Address of the Output queue| 
{*20° | | (IJLQAA50O). | 

| | | 
| DOF2 | 1 |OQTAM flags. Refer to DA | 
{724° | {type (DFLG field). | 

| | 
J|DLNA_ | 3 |Address of the user area | 
125" ] [that is to receive the | 
| ; {destination line name | 
| | | (LINAD). | 
| | | | 
{|DLNK | 4 |Address of the last PQ, DQ, | 
j" 4c" | Jor AQ type DTF opened ina | 
| | [message processing program | 
| | | 
{DSAV | 4 |Parameter for truncated | 
{*50* { |subtask. | 
| | | | 
JDLMT {| 12 |High priority element | 
}* 54" | | | for immediate posting. | 
| | | | 
[DOPA | 14 [Combined QCB/STCB. | 
[*60" | | | 
| | | . | 
]DBRC_ | 4 |Entry point to imple- | 
}"6c° [ {mentation subtask. | 
Princ Nt ee ee ae ge os ns Seg endl 


LINE CONTROL BLOCK (LCB) Bas a : 








|  ipecdereceundes mameaaiaces soe esis ecient { 
*“54* J} LCDC | LCIR | 
(Ss r=* 1 asses pian seatar ev me eit (oss =-=  Seseataedesiacenngecam manera | aca acearea ot { 
"OO" | LSTA | LEOP | "58" | LCTO | LCAM | 
| LREY | 1 ot | {------------- $------7------}----- 
}------ 4-~—--—----~-----—~~--~-~- { ECB | "Sc* | LRCT {| LTBO | LTB1 | 
| LOPC, | LDAD | | QCB ¢------------- 1+—————— 1—_———— { | 
‘ou | LOPR, | 1 | | | LATN ; | 
| LRPR | | vi "60" | LSBO | LSB1 | LLUC | LLUO | | 
[------ $-------------------- }----- | t------ 4—-—---1-—---- 4_-—_-- { CCB 
"OSs" | LENT | LRSA | V "64" | LCPA | 
|--——~-}-~---~--—~-----—-— }---—--—~ }-~---~---------~----------- 1 | 
"OC" | LSPR | LSLK | } LOCB | 
}------ 4———_-———__--— +-----—- 4 "68" | LTB2 | LAPA | ov 
"10" | LHDR | LSEG | }------ 4. -----~--- }---—— 
|}------------- T------ t—_———_ 4 "6c" | LAST | 
"14" | | LNAS | }----------~------~--------- 4 
}—-~—--- a bn | "70" | LSAV 
18" | LNAS | LALT | | { 
[------ }------------------- -| }--------------------------- { 
"1c" | LMPR | LODT | "78" | LERC | 
|------ }-------------------- { | | 
"20" | LTPR | LPCI | }-----------~~---+--+~—------- j 
ao gs ee | "80" | LSCP | 
"24" | LCCW | / / 
}~------------ .------------- { (Channel Program Area) 
"28" | LHW | LBCT / / 
|~------------ +------------ 4 | | 
ye" |. TTTD | LDLD | (+--+ - +--+ J 
|------------- 4——---—------— ! 
*30* | LDTF | Note: ALL DSECT names have the four 
Bee, }------ Yr---------- -- ---- 4 character prefix IJLOQ. 
a . "34" | LWrr | LRST | 
Cw }------ fe See | Figure 18. Typical LCB DSECT (IJLOLCBO) 
"38" | LMCT | LPPT | (Part 2 of 2) 
as ; Rae ; eg aera | 
‘3c" | LMPL | LDFG | LEOB | 
[------ +------ 4-__-------~-- { 
‘4O" | LRLN | LPOL | 
Riniaaanes SSS 1 Sai IE | 
"44" | LSEN | LLAD | 
}------------- +~------------ { 
"4g" | LECT | LERR | 
pes ee 1 aaaaedaly Gna eRe EAE 
"4c" | LTRE | LDCE | LIRE | LTOE | 
ete i peer ee ( eneapeneatn eeven: Cece ene J 


Figure 18. Typical LCB DSECT (IJLQLCBO) 
(Part 1 of 2) 
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Contents: 


LEOP 


s 
=) 
ray 

a 


344 


cee ee eee cere ee cee See ee ee ce ee ee ee Dae me HE eee MD END cee an ce ED es | 


Description | 


ac Ee pastes as cease ea | 
The status of the line: 


X'00*=inactive 
X'01'=line free 


X*02'=partial message 
in queue 


X'O4W'=send 


X'O08'=receive 


X'10'=initiate 
x‘ 20'=converse 


+ 
| 
| 
4 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| 
| | 
| | 
| | 
| | 
| | 
| | 
| X*40'=recall | 
| | 
|Status of communication | 
{line queue represented by | 
jthis LCB. Key values have | 
jthe same meaning as for | 
jother QCB‘'s. | 
| | 
|If receiving, the return | 
{address from the Route | 
jJmacro to the next in-line | 
Jinstruction in the user's | 
|LPS. If sending, address | 
jof the LCB for the | 
Joriginating line. | 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


|Read/write operation code 
|for the current segment of 
|current message. 


}QCB*s Ready Queue priority. 


| 
|Response message priority. 

| | 

|Disk relative record number 
Jof last correctly 
|transmitted segment of 
jcurrent message. When LCB 
Jappears on the Ready Queue, 
{this field contains the 
jJaddress of the next item on 
{the Ready Queue. 

| 
{Entry code (X‘'12") for 
|Receive scheduler subtask. 


| 

|Address of the first STCB 
Jin the STCB chain of the 
j|communication line 


a as a a a aa a aaa ee aa al 


DOS QTAM Program Logic Manual 


am aac AR a aa a | 
| | Length| | 
| ain | — | 
{Field |Bytes | Description | 
man nnn nnn nn nn nnn nnn nf 


{| queue. 
{jbe used for input, this 
[field initially contains 
{the address of the Receive 
| Scheduler STCB (address of 
[this field minus 1). If 
{the line is for output 
Jonly, it contains the 
[address of the Qdispatch 
|STCB (IJLQIP8D). 


If the line is to | 


| 
| | 
l | 
| | 
| | 
| | 
| | 
| | 
! ! 
i | 
LSPR_ | 1 |Priority of the Receive | 
* 0c" [ {Scheduler subtask: | 
| | | 
1 1 1 = lower than Send | 
| | Scheduler priority | 
| | | 
| | 2 = equal to Send | 
{ | Scheduler priority | 
| | | 
| [ 4 = higher than Send | 
! | Scheduler priority | 
|LSLK | 3 |Link address field in | 
|" OD" | |Receive Scheduler STCB. | 
| | | 
|LHDR | 3. |Disk relative record number | 
{*10° | {of the current message | 
| : jaakaei | 
J|LSEG_ | 3 |Disk relative record number | 
}*13" | {of the current message 
| | |segment. | 
| | | | 
{LNAS | 3 |Address of the first seg- | 
{*16* | [ment of the last message | 
| | | received on this line which| 
| | |is to be transmitted. | 
| | | 
{|LALT | 3 |Address of the LCB for | 
i? 19" { | another source line | 
] | |currently sending to the | 
| | {same destination. | 
| | | 
|LMPR_ | 1 |Priority of the current | 
age Fes | |message. | 
| | | 
]LODT | 3 {Address of the OCB for the | 
‘erce 3 |destination terminals. | 
| |Valid only when receiving. | 
| | | | 
|LTPR | 1 | Temporary storage for | 
"20°" | {priority of outgoing | 
: | eerie | 
|LPcI | 3 |Address of last CCW for | 
2k" | [which a PCI was received. | 
| | | 
{LCCW | 4 {Address of last BRB/CCW for| 
pr24a" | {which a buffer was 
| | Jassigned. | | 
Geese. aaa se a ETA nee eo IEA ee ee Se oe Se J 








F ee eee 


| 
| LEHW 


{"28" 
| 

| LBCT 
{*"2A* 


LTTD 
e 2C. e 


ie 
Ww O 
rH 
| 


2  |Communication line 
{error halfword. 
| 

2 |1f receiving, contains the 
|next expected sequence-in 
Jnumber (IJLQOTSIN field in 
Jterminal table entry). If 
{not receiving, this field 
|contains the time of the 
|requested interrupt as 
|established and used by the 
JEnd of Poll Time Delay 
| routine. 

2 |Offset from beginning of 
[terminal table to the 
[terminal table entry for 
Jthe source terminal (if 
|receiving) or the 
|destination terminal (if 
|sending). 


| 

2 |offset (less 18) for cur- 
[rent entry in terminal list 
[field of distribution-list 
Jentry in terminal table. 


| 


| 
4 jAddress of the DTF table 


|for this LCB. 


terminals: 


X'O1° 
X*O2° 
X*Ou' 
x"08* 
X*10°=WRU flag 
X*20‘'=Working flag 
X*4O0"=EOT flag 
X*80'=Halt I/O flag 


Not used 


Address of restart CCW. 


EE eu ge a SS a ee ee apes SE geese ee ST EE ee GE) comes GEE eee eee 


1 |Count of the messages 
[received from terminal. 


3 |Address of current active 
Jentry in the polling list 
jfor the line. 
| 


| 
1 |Scan pointer offset of the 


{next destination code in 
Jmessage header. 
1 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
Flags for World Trade | 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


ee eneee iD aD anes 


| " 3p? 


LEOB 
"3 


LRLN 
"HQ" 


wee Oe eee OO ge SE Qe gees ee eee ee ee Oe fee OO ge ee ee OE pet Oe geet 8 geet OO eee 


| LPOL 
| @ V1 8 
| 

JLOEN 
| q yy* 
| 

| LLAD 
|" 46" 
| 

| LECT 
| 2 net 


LERR 
v ly A 


LTRE 
v ly c " 


On wee ee Eel oO eee ee gee ee gee ee ee eee eee ene ee eee ee ee 


| LNCE 
| 9 Wp* 


ee ee ae ee ee ee eR emt ee RD cm RE TED ED eR ENS RED eee EES QUES GED RD PED CED ED cD aD <oURe GD ee eS oe 


- 
| 

| 

| 

+ 

| 

| 

| X*01'=destination terminal 
| is not currently 

| connected to a line 
| and an outgoing 

| message is waiting 
| in queue. 

| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


X"'02'=line has been 
assigned for dial or 
line is connected to 
terminal. 


X*O04"=polling or 
addressing error has 
occurred; this is a 
Signal to disconnect 
the line. 


2 |Address of EOB character 
|relative to the address of 
[the last correctly 
{transmitted segment of 
{current message. 


1 |Relative line number for 
[this LCB. 


| 
3 {Address of the polling list 
| for this line. 


| command. 


2  |Line address (used for HIO 
[in Send Scheduler). 
| 

2 |Character count in current 
{incoming message, used 
| byBREAKOFF routine 
| ([JLQBO). 


| 
|The next 18 bytes are used 
|by the Error Recovery 

| Procedures in the Line 

| Appendage module (IJLQLA) 

| 


| 
2 |Retry count of CCW error 


|for ERP routine in Line 
|Appendage ERP routine in 
| Line Appendage module. 
1 |Threshold line error 

| counter=number of 

| transmissions. 


| 

1  |Threshold line 
| counter=number 
| checks. 


error 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
I | 
2 |Sense data from sense | 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
of data | 
| 


| 
| 
! 
| 
1 
1 
| 
! 
{ 
{ 
| 
| 
| 
| 
| 
| 
j 
| 
! 
{ 
I 
| 
| 
! 
| 
| 
i 
i 
| 
| 
| 
! 
i 
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ee 


T 
| [Length] 7 
| in | : ae | 
Field |Bytes | Descripti a 
= oO 7 
arse Lad ee ih A tiene [Bytes | Description | 
| LIRE | 1  |Threshold line error | a ss : Peete ge eee et ee ee | 
[GE | |counter=number of | {LCPA | 4 Add 
| | intervention required l 1" 64" | ress of channel program 
| ; ieeeoes. | : | {area (first CCW). 
| | 
|LTOE | 1 [Threshold line error | eee | 4 {A full word containing the 
(['4F | |counter=number of nontext | |address of the CCB for the 
| l [timeouts. : | | | IBM 2260 Local terminal. 
|LCTR | | ; ; | }LTB2 | 1 |Appendage indi 
pe | 4 |Cumulative line error | [*6s" | x'uor OC Ae ene eee 
: 30 | Nesbesiecrare number of | i { | ° 
transmissions. 
| | | | eae | 3 |Address of Line Appendage 
ent | 2 {cumulative line error l | | ae (IJLQIP4O). 
| counter=total number of 
| : ‘data checks. 3 | {Last | 4 [Address of last ccw 
) | | | *6C | | executed. 
{|LCIR | 2 {|Cumulative line | | 
error 27s 
{*56" | |} counter=total number of : oe | fe eee sere 
| | feito ieee required | | | 
errors. 
) | : | ae | 8 |Error recovery CCW 
ear | 2 pein aeaags line error | | | 
|counter=total number of 
l l fontert-+imeouts. | Lia | 8n |Start of channel program 
[LCAM 2 |Flag field for ERP routines| | Laat a eceplnh anag ee 
| "5A | [in Line Appendage module. | i iar sphere aes eSruiniee 
| | : | | | | {type on the line. The last 
| | |The next 16 bytes are the | { | renga Apaces Cal ok cama 
| | {CCB data incorporated in | | lige nates oe poe 
| | [the LCB ! | {this option is included in 
| | | | |the system. 
ee Nene eee 
|LRcT | 2 {Residual count TO 
PoC | { | 
|LTBO | 1 - issi | | 
a | Transmission byte 0. | 
noe 
ee : 1 (eee byte 1. | 
| | | ! 
ae { 4 |A full word containing the | 
| | | Attention QCB for IBM 2260 | 
| | [Local line group. This | 
| | |field is initially set to | 
| | {the address of the dummy | 
| | ake element, IJLOQIPSF. | 
|LSBO | 1 |[csW status byte 0. | 
oF a! 
pr | 1 |CSW status byte 1. | 
ed «| 
{LLUC | 1 |Logical unit cl : 
ass; always 
al | |x'O1° : : 
| | 
eae | 1 eo unit order (X‘nnn‘) | 
eee aaa eraser aes Be aS ees J 
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AUDIO LINE CONTROL BLOCK (ALCB) 7772 ALCB 





re ee ee 7 
"58° | LwW21 | 
} LCWZ Channel Program Area | 
<= = = SS Sr a ee ey re / / 
*00*° | LALO | LQCA | 
ear 4—-—--———_..---_-_----| ECB / / 
'O4* | LIHP | LLIA | ov {-—--—~—--—~--~--- qa se j 
poos-== he ee eee ee t---~ *co* ] LACP | LCWL j 
‘os' | LSTS | LDTA | ------- ------ 4——————-——~——~~ j 
---~+—- 4------7------7------f "cy" | L72F | LDBA | 
‘Oc* | LALI | LRAN | LSSF { LERB | ¢------ 4+---------—-—-—~~--+--~ f 
Seeureeeeen oe eens eee aver eevee! *c8* | LTPC | LDCV | 
*10* | LLEA | t------ 41--—---———~-—-—~-—~———-~--- q 
}—-—————------ 1------------—- | *"cc* | LLOoc | 
"14" | LIML |} LACL | / / 
|-------------4------------- { 
*18* | LIBA | / / 
|-------------------------- + {00 penan---------------- { 
"1c' | LACA | *pce' | | LOGTIME FIELD | 
aaa : eaREaRTaR Candee teen 7----— | acai ; ] 
"20" | LATR | LAHU | LARE | LAWE ] / / 
a yaaa a fee ee eee 5 aera - 
"24" | LACT | / L 
|------------- q------------- { | -------------7-------------} 
*28* | LACH | LACR | "EY* | | INPUT AND |] 
—--——-——------ 4-—-------~~--- }------—-------1J ADDRESS | 
'2c' | LACW | LARC | i CHAIN | 
Bis oe re 4—--—-----~-—~_| BUFFERS | 
"30° | LAEF | (not used) | . L——______-_-___-_- + 
Mepeiier See ee ee era [eee eee 
"34" | LACC | 
————-—-—-—-——-~--—--——-————-------f 
@ ~~ 38" | LACF | 7770 ALCB 
cn | | (se SIE reals acca Ace nc 1 
cal | | "58" |} LEO i 
—————— —- —- — — - - - 5 | LCWZ Channel Program Area ] 
"4o* | LACS | / / 
| | 
{ | / / 
|------------- y------1------ }---- }--------------------------- { 
"4g" | LREC (LCBZ) | LBOT | LB1T | *90" | LLUR | 
------ qy------$------4------4 | .--------------------} 
"uc" | LBOS | LB1iS | LCLU | LLUI | | / | / 
}------—1------4--_~~—-1------] CCB | 
"S50" | LCAI 1 | / l / 
L___.__. See ee Ae 1 | | “HO*- 4 {| LOGTIME FIELD ] 
"S54" | LAPI | LALA | Vv }—---——- 4 
ea esine eee BO le le septa ae d | eeneeere / / 
Figure 19. Typical ALCB DSECT (IJLQLABO) / / 
(Part 1 of 2) | { pron 
"AB" | | | 
}------! | 
l INPUT AND ADDRESS |] 
j CHAIN BUFFERS ] 
/ / 
v4 / 
a ah | 


Figure 19. Typical ALCB DSECT (IJLOLABO) 
(Part 2 of 2) 
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Contents: 


r (OREN Rite SUSUR GREE eeED 


er cae ene ee me 


348 


~T 
j Length 


in 


| Bytes 


- — — — — — — — st 


|Description 


JECB key always X‘00* 
| 


| 

|Address of the QCB 
{associated with the ALCB by 
Jthe QPOST function. 
anes priority. xX*‘FD* if 
jthe ALCB is processed in 
{the message control 
jprogram. xX*FC' if the ALCB 
Jis processed in the message 
[processing program. 


| 

[When ALCB appears on the 
|Ready Queue, this field 
{contains the address of the 
[next item on the Ready 
| Queue. 


| 

{ALCB status, used by the 
Jaudio programming to 
{determine the next action 
Jto be taken on the audio 
jline. | 


ENABLE CCW was issued or 
is ready to be issued. 


X*02'=Read status. A 
read operation was 
completed. 


X"04"=Disable status. A 
disable operation was 
completed. 


X"08*=Write status. A 
write operation is in 
progress. 


X*°10°=7772 initial write 
status. An initial write 
is in progress. Only 
used by the 7772 ALCB. 


X*20"=Stop status. A 
STOPARU macro instruction 
was issued for this line. 


X*°4O"=PUT status. A PUT 
was issued for this line 


OER ee tee TD etn ES HED NES TE OE ED A ES ee cE EN CN, ED ED NED GENO chet Gl eee 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
X"01"°=Enable status. The| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
{ 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
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fo 


LDTA 
#098 


ALT 
0c" 


nda 


LRAN 


@ 
co) 
o 

3 


|; LSSF 
a OR* 


7 
| Length 


in 


|Bytes |Description 


SO A SND ND ES EE NE A SS RE NE A LN SL A SD OE ED Se NS ON EES eS eS comes cones cohen 


fom mee eee armen eee een eee eean eee eee iat omens 


| 
| 
| 
| 
| 
| 
kK 
I 
i 
| 
! 
y 
| 
! 
| 
! 
! 
| 
| 
! 
1 
{ 
| 
| 
| 
| 
| 
| 
| 
i 
l 
1 
! 
t 


—_ ee TD ce ENS EP Se TN NE EY SED UES ED HENS SIE UN GOED NED mene GED ED GE GOD CED CED 


: 
| 
| | 
| 
| 


and the repeat function 
may take place until the 
line is disabled. 


X'80*=GET status. A GET 
was issued for this line, 
and one and only one PUT 
must be issued on this 
line. 


{Address of the DTF table 
| for this ALCB. 


| 

{[ALCB indicator. Always 
|X* FF". This indicator 
| distinguishes audio and 
|nonaudio elements. 

| 

|Relative line number 
{within the line group. 


Start/Stop flags. 


X*01"=The channel program 
is ready to be executed 
and an EXCP must be 
issued. 


X*20%=The halt function 
is requested by a CLOSE 
or CLOSEMC macro 
instruction. 


| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| xX"40"=The start function 
| is requested by a 
| STARTARU macro 
} instruction. 
| 

| 

| 

| 

| 

| 

| 

| 

| 

| 


X"80"=The stop function 
requested by a STOPARU 
macro instruction was 
performed by the audio 
line appendage. 


Audio error byte. 


{Address of the line table 
{entry. The high-order byte 
|is used to store the sense 
| data from the sense 

| command. 

| 

|Iinput message length, not 

| including the EOT character 
[if any. 


ewe commer cme, Sueen cOweD emewe ED SEE ee SETS SES SD ED NED GEE SOT cE EE AA NE SES SETS SAS GI NORE SE AEN EES GREENE SR SL SO NE SAE SE SES SRD ome SST SORTASE CMRI coe GREER COU SEE cee SN SEEETES REED SURED CRS QURRES SEREEA GEN cen nme come 


~ 


one eee ees Ee AE eS Re SD Ds Re eee ets ID emt ee ere ES eee EE GUE SOND GREE GREED OED cemten UUE EN OES SUED ED ERED EI SOMERS RN OURS ce 


| Length| 


fe es et et et a i 





in 


{Bytes |Description 


------ 4---------------------------} 


2 


= 


{Address chain length. 


| 
jAddress of 


|located in 


the input area 
the ALCB. 


the address 
located in the 
the input area. 


| 

{Address of 
{chain area 
|ALCB after 
| 

[Number of transmissions. 
| 


| 
|Number of hang-up 


|operations. 
| 

| Number 
|errors 
| 

| Number 
|errors 


of data-check 
on read operations. 


of data-check 
on write operations. 


{Cumulative counter for the 
{total number of 
Jtransmissions on the line. 


}Total number of hang-up 
|operations. 


jTotal number of data-check 
{errors On read operations. 


| Total number of data-check 
Jerrors on write operations. 
| 

{Retry counter of CCW 
[errors for ERPS. 

| 

|Flag field used by ERP'"s. 

| 


| 
|Address of the 


| last-executed CCW. 

| 

|Save area used to store 
{the failing CCW. 

| 

{Error recovery CCW used to 
| issue the Sense Command. 


| 
|The next 16 bytes are the 


{CCB data incorporated in 
{the ALCB. 


|Residual count. 
| 
| 


| Transmission byte 0. 


ENO ET EEE AND ENED EEE CEE ET ce OS SND SOND INTLD NY AED ND AED CAD ALO RD NO CER OND SEEN ES 


ane cement scpasenis SONS ccinieniies:. inten AINENOIIA. cata, inane qimpen, “stm samt: Sem. ich, SINAN. ee: tensemiet:. maine, SmI ‘shat. siniiantnth, ‘einen “NMEA amas: ies jpteicin smaamiind saci: dmepai cies. ime scans. Semin: SmNNiLS sebgsitty: themes agian, sink nepal ipiapeait simile sideman eels chmptai Mecemi pate, ‘itil. sendeninte, Veena: tinmientes SE capeinins: iteieanii iim EE: lala Snail, Sem 


c------ 


| LBIT 
} "4B" 


| 
{LBOS 
," 4c" 


| 

1LBLS 
|* up" 
| 

{ LCLU 
| g TS 
| LLUL 
|” Yeu 


| 
{LCAL 
}*50* 


| LAPL 
,* 54" 
| 

{LALA 


}" eo au 


+~-----—— 


| Length 


in 
Bytes 


1 


ee 


|Description | 


}--------------------------- 


| Transmission byte 1. 


CSW status byte 0. 


CSW status byte 1. 


{Logical unit class; always 
{x"01". 


| Logical unit order in 
|class. 


| 

|Address of the first CCW 
{to be executed in the 
j|channel program area. 


| Appendage indicator; set 
{to x*40° 

| 

{Address of the Audio Line 
|Appendage routine (IJLQAA). 


| 

|The following bytes end a 
[7772 ALCB: 
| 
| 


{Channel program area for 
{13 CCWs. 


{Pointer in the 7772 
{address chain. 


| 
| Length of the current DCV 
|word to be sent. 


|Send flags, used during 
{the sending of a 7772 audio 
| answer. 


X*01"=The first DCV word 
is to be sent. 


X" 02"%=The Last DCV word 
is to be sent. 


X"04"=The previous DCV 
word may be followed by a 
programmed pause. 


X" 08%=The DCV word 
representation has been 
found. 


X"10"=The first DCV word 
is searched. 


ee a ee er el ee re ee 


Bees ee ee ee ee sais ge Sale ede ee 
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'#c5!" 


LCWZ 
a 58* 


LLUR 
*90" 


Co ee ee eis Ee eee OE ee EE oe cen ee ee ee eee ee ee ee ee eee ee eee ee eee Oe ee oe oe oe 


Ta me aque eames samme nme 


| Length 
in 


{Bytes |Description 


A ee Aci RE ce ET ce EN REN een MR one StS cue Sete cee eS aeen anf 


X*20"=The address chain 
ends abnormally, and a 
DISABLE command must be 
issued. 


X*40*=Used to determine 
which sequence of write 


the sending of the next 
DCV word. 


X*80"'=Used to determine 
which part of the DCV 
buffer must contain the 
next DCV word retrieved 
from the 7772 DCV 
vocabulary file. 


{Address of the DcV buffer 


jassociated with the ALCB to 


jsend the audio answer. 


]|Temporary pause counter. 


| 
{Address of the current DCV 
jword to be sent. 


[Optional field, used to 
|store the logical order in 
|class, the input message 
Jlength, the date and time 
{stamping in front of the 

J input message. 


| 

| The 7772 ALCB ends with 
Jthe input area immediately 
| followed by the address 
jchain area. 


The following bytes end a 
7770 ALCB: 


{Channel program area for 7 
| cCWs. 


}Optional field, used to 
{store the logical order in 
jclass, the input message 
Jlength, the date and time 
|stamping in front of the 

J input message (included in 
{the LOGTIME field. 

| 

| The 7770 ALCB ends with 
{the input area immediately 
| followed by the address 
j|chain area. 
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ccWs is to be updated for 


OTAM VECTOR TABLE 


The QOTAM Vector Table is a 22-word table of 
addresses. The table contains the 
addresses of all areas containing control 
information necessary to effect the 
cross~-partition communication required in 
DOS/QTAM. A four-byte field is reserved 
for QTAM in the DOS Communication Region 
(displacement X°80" from the beginning of 
the Communication Region). The address of 
the QTAM Vector Table is placed into this 
field at Open time so that QTAM routines 
requiring information in the Vector Table 
can access it. The fields in the QTAM 
Vector Table follow. 


Field 
Word Name Description 
1 VECTTBL Address of the terminal 
table 
2 VECIPI1AD Address of the 
Implementation module 
3 VECSVCAD Address of the QTAM 
SVC/Subtask Control 
routine in the supervisor. 
4 VECLDTF Address of the DTF table 
for the last QOTAM file 
opened in the message 
control program. 
5 VECIP78 Address of the Return 
Buffer OCB 
6 VECEXTNT Address of disk extent 
information (IP1EXTNT) 
7 VECBUFSZ Address of the halfword 
containing the buffer size 
minus 8 
8 VECDADTF Address of the DTF table 
for the first opened 
message control file (DA, 
AV, Or LG). 
9 VECIP71 Address of the Active-BRB 
OCB : 
10 VECIP5F Address of the dummy end 
of chain ECB (IJLOIPSF) 
11 VECIP8C Address of the Queue 
Insert by Priority STCB 
12 VECPDOLK Address of the DTF table 
for the last QTAM file 
opened in a message 
processing program 
13 VECQMOVR Address of the Qmove QCB 


Ne 


14 VECMRSW Address (minus one) of the To conserve storage, the QCB and truncated 


nO master receive switch STCB frequently are combined. The general 
€ : form of these control blocks when combined 
Sw aS VECCPFLG Flags for the checkpoint is: 
records file 
15 + VECCPDTF Address of the DTF table Combined QCB/STCB 
1 byte for the checkpoint records r--------- ----------- --------------- 7 
file "O00" | Key | element chain pointer | 
t--------- | -----------------=-------- 
16 VECIP72 Address of the Available ] OCB | | 
Buffer QCB "O4" | Priority] QCB link address | 
t--------- 4-~------------------------ { 
17 VECIP73 Address of the Disk I/O }| Entry | | 
QCB. *08* | code | STCB chain pointer* | 
}--------- 4-------------------------- { 
18 VECIP77 Address of the LPS QCB |] STCB i | 
"OC" ] Priority] STCB link address | 
19 VECDRRN Next relative record L_—______—_— 4i----—~—~—-~—~——-——-—~———-—-—— —-—--- 4 


number to be used on the 
Girect access file. 
* address of this field minus 1. 


20 VECQIP26 Address of address for 
Post Send and Post 
Receive. 
21 VECLTBL Address of the audio line 
tabie. 
OCB FOR DASD DESTINATION QUEUE 
22 VECARUSQ Address of the ARU-Send | 
OCB. 
An extended QCB of 32 bytes is generated in 
the problem program on expansion of a TERM 
a macro instruction. A QCB is generated 
\. | SPECIAL CONTROL BLOCK FORMS either for each line or for each terminal 
tne on the line, depending on the type of 
queueing specified in the TERM macro 
COMBINED QCB/STCB instruction. Typical DSECT: 
The pattern of unused bytes in the QCB and .[----- -t-- - - - - - - - - - 71 
the truncated STCB is such that these "00" | QOKEY | QNRA | 
blocks are capable of being combined as may }--~>---+-------------------- 4 
be seen from the general forms. "Ou" | | QNNT | 
------ }-------------------- 
QCB "O08" | QENT | QSTC | 
(ee GSS ees Seas Wee 1 iS a { 
"OO" | Key | element chain pointer |  “%O0OC* |] QSPR | QSTL | 
|--------- -------------------------- { f= }-------------------- { 
"OU" | priority | link address | "10" | ORLN | ODTF | 
}--------- |------------------------ —4 t------ 41----— 1------------- { 
"O08" | | STCB chain pointer | "14" J QMCT | ONWA | 
a See SO as a ete ee ae es J |}-—--—~ --—-— kaon eee el ee | 
"18" |} (QNWA)| QLCB | 
------ 4---~---------------- 
STCB (truncated) "1C" | QLOF | QBAK | 
p++ wp a ee . Dacre ee eet ee J 
‘OO" | entry | | 
| code | | 
---------— +-------—-—----------------—- 4 Note: All DSECT names have the IJLQ 
*O4U*® | priority | link address | prefix. 
DE a eran (Mey Ape ne een AT rit Sele ese ee Seep aren 
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| | Length| | 
(-==-==7----=> gus SseSsse3355 === 1 | | in | | 
{ | Length | | |Field |Bytes | Description | 
| | in | | t------ See Se a ee ee { 
|Field |Bytes | Description | JQOLcB | 3 |The address plus 1 of the | 
}---—-—-——- 4+--~~-~— 4+----—--—----—-—-—-—~—--—~—-—-~—-—-—-—-—--—-—-f j*19" | [first LCB on the chain of | 
| { | | ] | |LCBs currently sending to | 
{QKEY | 1 j|A dummy queue status byte, | ] | jthis destination. The | 
| "00" | jset so that the QCB appears] | | |dummy last element in the | 
| { {to be on the Ready Queue | | | |chain is this QCB. { 
| | [and is therefore never | i | | | 
| | jactually put on it. { | | | | 
| | | JQLQOF | 1 |Always set to x'00", this | 
JQORNA |{ 3 |The relative record number | j‘ic* | | field distinguishes this | 
eee Be | {of the next message header | i | |QCB from an LCB [ 
| ] Jto be read from this DASD | | | | | 
| | | queue. | | 
| | | | JQBAK | 3 {The disk relative record | 
{ONNT | 3 |The relative record number | j*"1D" | [number of the last previous| 
{*05* i Jof the first segment to be | | i |header placed into this | 
| Jnormally transmitted after | | | |queue. If there are none | 
| | ja restart. The preceding | | | [in the queue, this field | 
| ' |segments are transmitted | | | [contains zero. | 
| | [even though the ‘previously | L—_————— 1--——— 1 —— ~~ J 
| | |serviced* flag is set in | 
| j {the buffer prefix. | 
| : | | 
JQENT [| 1 {The entry code (X"84') for j| 
{'08* | [the Send Scheduler subtask. | 
| | | | 
| QSTC | 3 | The address of the first { OCB FOR DASD PROCESS QUEUE 
{"09" | {STCB on the STCB chain for | 
| { [the queue. This field | 
| | Jinitially contains the | An extended QCB of 32 bytes is generated in 
| | {address of the STCB for the| the problem program on expansion of each 
| | |Send Scheduler subtask | PROCESS macro instruction. Typical DSECT: 
| | | (address of this field | 
| | oes 1). | 

SS Se5 a ala ac 

{OSPR | 1 {The priority (FL1'2") ae | 008] QKEY | QNRA | 
j*Oc" | jthe Send Scheduler subtask.{| = }[------ 4—~-—~—~—-—~—~—-—~--~—---~—---- { 
| | | | "04"| | QNWT | 
JOSTL | 3 {The address of the next f 2 fe ee 4—~——-—~—~—-—-—-—-—~—~--—~--~--——— 4 
;"Op" | {STCB in the STCB chain. | *"08"} QPOF | QsTc | 
| | {This field is initially set| ——— }------ 41————~——— ——~————~—-——~—— 4 
| | jto the address of the STCB | *Oc*] OMSL | 
| | | for the DASD Destination fo PR eee - 
| | | subtask. | "10" |} QOFST ] QFLG | 
| | | }------------- y------+--~--- { 
{ORLN | 1 |The relative line number of | "14" |] QOMCT | QNWA | 
j*10" | {the first line on which ,o 2 Pee +------ 41-—~——~—-———~———— { 
| | {sending is attempted for | "18" | (QNWA) {| QLCB | 
| | [messages in this queue. }o00 Ofer 4------~—--~------+-----~- { 
| | | | "1c"| QLOF | QBAK | 
J|ODTF | 3 |The address of the DTF }o 00 PR ee - 4 -- - -- -- - - - -- --- -- + 4 
,*11" | {table associated with this | "20" | | QHDR | 
| | as | L______ 1—-——~--——~~—~~—-—~—-—-~-~—~--—~— 4 
|OMcT | 2 |The number of unprocessed | 
j*14" | |header segments in this | Note: All DSECT names have the IJLQ 
| | | queue. | prefix. 
{QNWA | 3 |The disk relative record | 
{[*16° | [number for writing the next| 
| | 
L i 


[message segment. 


H 
| 
| 
| 
| 
I 
be 
| 
| 
1 
| 
I 
I 
| 
i 
i 
| 
| 
| 
i 
{ 
| 
| 
| 
| 
! 
| 
| 
! 
| 
! 
| 
fen 
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Contents: (== SS= 5 aaah a acta a SS SS  aluetemhesteattaniemtmeatand 1 
ye | | Length| | 
( [~-----y------ qy--------~--------—-------- 1 | | in | | 
ee | {| Length] | }Field |Bytes | Description | 

in | | 9 ------- f------ 4----~---------------------- { 
|Field |Bytes | Description | }OLCB | 3 |The address plus 1 of the | 
—-~---— 4—-—--—--—+4-----—-—----—--—-——-—- ---—-------f }*19" | [first LCB on the chain of | 

{QKEY | 1 JA dummy queue status byte, | | | |LCBs with messages to be | 

{°Oo" | jset so that the QLB appears| | | {placed on this DASD queue. | 

| | jto be on the Ready Queue | | | {The dummy last element in | 

| | Jand is therefore never | | | {the chain is this QCB. | 
| | Jactually put On it. | | | | | 
| | | | |OLOF fj 1 |Always set to x'00", this | 

{|QONRA | 3 {The relative record number | iter | |field distinguishes this | 

{'o1" | Jof the next message header | | | |QCB from an LCB. | 

| | jto be read from this DASD | | | | 

| | | queue. | JQBAK | 3 |The disk relative record | 
| | | | {"1D" | [number of the last previous] 
|ONNT | 3 |The relative record number | | | |header placed into this | 

{"O5" | fof the first segment to be | | | |queue. If there are none _ | 

| | jnormally transmitted after | | Jin the queue, this field | 

| | Ja restart. The preceding | | | {contains zero. | 
| | |segments are transmitted | | | | 
| | jeven though the "previously | }QHDR | 3 {The disk relative record | 
| | |serviced* flag is set in | er }|number of the next header | 
| | {the buffer prefix. | | | {to be placed into this | 
| | | | } | |queue. If there are none _ | 

{\OPQOQF | 1 {Always set to xX'00', this | | | {to be placed into the | 

{"Os" | {field distinguishes this | | | |queue, this field contains | 

| | {OCB from the | | | {zero. | 

| | |DASD Destination QCB | L____—— 1t——-—-—-— 4———~———-—-—~——-—~—~—~—~~—~-—~——-—--—---- 4 

| | {(X*'84") and from | 

| | [distribution list (X"'02"). | 

— | | | 
: roane |} 3 |The address of the Get | 
a {*09"* | |Scheduler STCB. | 

| | | | 

{OMSL | 4 |The address of the LCB for | QCB FOR 7772 DCV BUFFER QUEUE 

{*Oc™ | jthe Main Storage Process | 

| | }Queue when the Main aa 

| | | Process Queue iS open. £ | An extended OCB is generated in the problem 

| | Jit is not open, this Field | program on expansion of a BUFARU macro 

| | Jcontains zeros. | instruction. The typical DSECT (I.7LQBABO) 

| | | also includes one DCV buffer element. 

{|OFST | 3 {|The disk relative record | | 

L°20" | {number of the first header | = --------y--------------- = 1 

| | |placed into the queue. | "00*} BKOC |BAFE | 

| | | pares a cor { 

|OFLG | 1 |DASD Process Queue flags. | "O4" | BNIR | 

,'13" | [Bit 7 (xX"02') is set on if | |}-------7------ -- - -- --- - ---- 4 

| | jthe Expedite option is | One always |BIFO | 

| | {specified for this queue; | {| x*OO" | | 

| ] jotherwise it is set off. | ——-——-—-——}4~-—---- ~~ -- 1 

| | | | *OC"*{ BBUN |BDEL | 

}oMcT | 2 |The number of unprocessed { ~--——— 4+ -- -- - - - -- 

,*14" | {header segments in this | "10" | BBUS ] BBDL | 

| | | queue. | 0 prem er rer rte rn 4-—-——— { 

| | | "14" not used | 

|ONWA | 3 |The disk relative record | L-—————— ——— —— —— —-~ ——-————-——— J 

Prio 64 |number for writing the next] 

| | Pies eeoe segment. | Note: All DSECT names have the IJLQ 

L_____— 41————~—-1-—~-—--~~—-—-—-—~-—--—~—-——-——-—-—---—-—- 4 prefix. 
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Contents: 


|followed by the address of 


JQCB key. 
jQCBs. 


Same as for other| 


| 

j|Address of the first 
Javailable DCV buffer. 
Jno more buffers are 
Javailable, this field 
|contains the address of the 
|dummy element (IJLQIP5SF). 


When 


|The high-order byte 
{contains the QCB priority 
Jalways set to X'FD"'. It is 


{the next item on the Ready 
|] Queue. 


|The address of the Queue 

| Insert STCB(IJLQIP8B). 
{When at least one ALCB is 
Jwaiting for an available 
|DCV buffer, this field 
{contains the address of the 
|DCV buffer STCB (IJLQAD41). 


|The number of DCV buffers 
Jin the DCV buffer pool 
|defined by the BUFARU macro 
J instruction. 


|Address of the first ALCB 
Jwaiting for an available 
|DCV buffer. These ALCBs 
|constitute an element chain 
Jended with the dummy 
Jelement (IJLQIP5F). 

| 

|Size of a DCV buffer 
Jincluding the control 

| information. 

| 

[Length of the data area 
{required by the user for 
Jeach ‘DCV buffer. 


hese cme teres ees Sc ees So cm ee ee SE gee te gee SS gees em ees es ee come ee ce Se ce ce cs es ee ee ee ee ce ee ee ee cee ee ee ee 


ro 
| 
i 
| 
i 
i 
| 
i 
| 
I 
| 
| 
| 
I 
| 
| 
| 
| 
| 
1 
| 
| 
! 
l 
| 
i 
| 


IBM 7772 DCV BUFFER ELEMENT 


Each DCV buffer generated in the problem 
program on expansion of a BUFARU macro 
instruction is basically an element control 
Such an element is shown in the 
IJLQBABO DSECT following the 7772 DCV 
buffer OCB. 


block. 
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eS ee es 
"18"°| BBPR  |BOQCA | 
~~—--—~—-—-—1--—-~-—--—--—--—-~-~-—-——-—-{ 
"1c" | BOEP | 
~-----~y-------------------| 
"20"| always|BLIF | 
{| x*00" | | 
~------}-~-----------------4 
"24" | BIND |not used | 
}-------4------------ .---—- 
"28"! BREC | BTBD | 
~------------------- +------4 
"2c"| BCSW | BLUC | 
een a eee ee 4___-__J 
*30"] BCPA | 
}----——- (= ea | 
"34") BCAF {|BDAP l 
}-------1-------------------] 
/ / 
/ / 
}~-~~--~-------------------- { 
"60*| BCCA | 
/ / 
/ / 
}--------------------------- { 
"70" | BDCA | 
Ue eee eee ee J 
Contents: 
Saas, aca aaa Ce a ee 1 
| |Length| 
in | 
|Field |Bytes | Description 
hae cee 4—-—-~-}~-_.._-_-- -_/ + 
JBBPR { 1 {Element key, always x'00‘'. | 
j°18" | | | 
| | | 
}BOCA | 3 |If the DcCV buffer requests | 
j*°19" | Ja disk | 
] | |xead operation, this field | 
| | {contains the address of the| 
| | [LPS QCB (IJLQIP77). If the| 
| | {DCV buffer is free, this | 
| | | field contains the address | 
j | Jof the corresponding DCV | 
| | | buffer OCB. | 
| | | 
J}BOEP | 4 |The high-order byte | 
peic*’ 4 |contains the ECB priority | 
| | Jalways set to X‘FD*. It is| 
] | | followed by the address of | 
| | {the next item on the Ready | 
| | Queue. | 
| | | 
|] UNUSED | 1 | | 
[*20" | | | 
| | | 
[BLIF | 3 |The address of the ALCB | 
ye2iP |associated with this DCV | 
{ | | buffer. | 
| a | 
{BIND |] 1 |DCV buffer indicator, | 
ye2a" | {always X*FE* | 
 eeiee ere | ea ieee a a J 





T 
| |Length| | 
| | in | . | 
{Field |Bytes | Description | 
a ne ene 
| | |The next seven fields 
| | represent _a_CCB 
| | | incorporated in the DCV 
| | os 
| BREC | 2 {Residual count. 

[°28" | | 

| | | 

{BTBD | 2 | Transmission bytes. 

["2A" | | 

| | | 

| BCSW | 2 j|CSW status bytes. 

[*2c* | | 

| | | 

|BLUC | 2 | Logical unit class, always 

[ 225" | }|X'01", and logical unit 

| | Jorder in class 

| | | 

{BCPA | uy }Address of the channel 

{* 30° |program area (first CCW). 
| | 

{BCAF | 1 | Appendage indicator, set to 

{"34" | aaa 

|BDAP | 3 }Address of the 7772 Disk 

{|* 35% | |Appendage routine (IJLQAD). 
| 

|BSEE | 4Q0 |Channel program area for 5 

[|"38° | | CCWs. 
| | 

|BCCA | 16 |Areas for disk address 

| "60" | |conversion and count. 

| | 

{BDCA | }DCV buffer area where the 

{"70" | |DCV words are to be read 

| | {from the 7772 DCV 

| | | vocabulary 

ba Sear eee Oa a Pe 


BUFFER REQUEST BLOCK 


The Buffer Request Block is basically an 
element control block with the element 
control block characteristics as previously 
outlined. The BRB, however, takes several 
different forms during its processing 
cycle. The significant fields of the BRB 
when it is in the element control block 
chain of the Inactive-BRB queue control 
block are shown here. This is also the 
form in which the BRB is generated on 
expansion of the BUFFER macro instruction. 


BRB on Inactive-BRB Queue 


here ame certs Smee SATE Seen SOREEED eNOS cen SEEMED apna teint amine GEENA SUNRISE eine Mirena GEUOE ncits ERED SREWEGD GASEOUS tipendm qmmeees SDSS aeceen emacs ene SOA gecems SnD suamen susan mueveren gumurn enue smu ummm momen 


aa Te ee ee ie 1 
"O00*|Key (0) ] OCB address | 
[-------- }-------~-------------------- ! 
"O04" |Priority| Link address | 
-------- }----------------------------4 
"08" | | | 
-------- }----------------------------} 
"oc | | 
bo Secie es a ae ese ee J 


The BRB Ring routine removes BRBs from the 
Inactive-BRB queue and forms the BRB ring. 
The following illustration shows the BRB 
after it has been processed by the BRB Ring 
Routine. 


BRB before assignment of next-segment 
address (in BRB ring) 


ee Ve ee gee 1 
"00*|Key (0) | OCB address | 
[----—--~ {--------------------------— { 
"O4*|Priority| Link address | 
}-------- }---------------------------- { 

TIC } | 

"08" {command { Address of next BRB in ring| 
|-------- }-----~---------------------- { 

} status | | 
"Oc*| (0) | LCB address | 
‘Se nee ane EU ga ae er aa eet ae J 


The key field is zero. All elements have a 


key of zero. 


The QCB address is variable. For the first 
BRB in the ring, this field contains the 
address of the Active-Buffer-Request OCB if 
the BRB is to be used for a Receive 
operation, or the address of the Disk I/0 
OCB if the BRB is to be used for a Send 
operation. For the remaining BRBs in the 
ring, this field is insignificant. 


The priority field is set to a value of 
X*EC' for the first BRB in the ring to be 
used for a Receive operation. This field 
is normally zero for all other BRBs. 


The TIC command is a transfer-in-channel 
command, and the following three bytes 
point to the next BRB in the ring. For the 
first BRB in the ring only, the TIC address 
will point to the actual address of the 
next BRB which begins on a doubleword 
boundary. For all other BRBs in the ring, 
the last two bits will be set to one (see 
BRB Status Codes) and represents the BRB 
address (always on a double-word boundary) 
plus the BRB-idle flag. 


The status field is zero, indicating no 
next-segment address has been assigned to 
this BRB. 


The LCB address is the address of the Line 


Cont.rol Block over which the send or 
receive operation will occur. 
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The Disk I/O appendage further 
initializes the BRB when the BRB is to be 
used for a read from direct-access storage. 
The appendage replaces the LCB address in 
the fourth fullword of the BRB with the 
relative record number for the message 
segment this BRB is now associated with. 
The assigning of the next-segment address 
is indicated by changing the value of the 
status field to 9. 


BRB after assignment of next-segment 
address has changed starting at the twelfth 
byte to: 


*Oc* | 
| 


+ 
{ 
(9) | 
| 
Loess 1 

The next illustration represents a 
buffer request block that has been 
converted to a CCW (BRB/CCW). A BRB/CCW is 
fully initialized for a write to or read 
from direct-access storage. The first two 
fullwords have been converted to a standard 
CCW, and are followed (in the third 
fullword) by the previously initialized 
TIC. This means that a complete BRB/CCW 
cannot be enqueued by the standard QTAM 
conventions, because the queuing 
information fields are occupied by the 
channel command word. The BRB ring is 
formed by the TIC addresses of the 
BRB/CCWS. 


BRB/CCW initialized for Direct Access 

Read or Write 

aa Dt ee 1 

{command | | Stand- 
"00" | code | data address {| ard 

}-------- +------------------ 
"O4* | flags {| O data count | CCW 

|-------- {----------------- { 

TIC | address of next | 

‘O8*|command | BRB in ring | 

[-------- 4------------------ { 

| | LCB address or | 
"Oc"|status | relative record | 

| | mumber for next | 

| | segment | 

geet tes Eine ee NG erecta Pre rea oar J 


In the BRB/CCW, aS in any other forms of 
the BRB except that appropriate to the 
Inactive-BRB queue, the fourth fullword may 
contain either status = 0 and an LCB 
address, or status = 9 and a next-segment 
relative record number. The next-segment 
address is inserted in the BRB when the 
Disk I/O appendage is processing another 
BRB in the ring. The BRB in which the 
next-segment address is replaced is 
selected according to its position in the 
Ying, without reference to the queue (if 
any) upon which it appears. 
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The typical DSECT for a BRB is: 


eases Sa ac aaa a ae ara 1 
| RKEY | | 
| {| ROCB or RCDA ] 
{| RCC | | 
}------ }~-------------------------- { 
| RPRI | 
{ {| RLKA or RCT i 
{| RFLG | 
}------ }----------------- 1--------- { 
| RTIC | RCH |RSTC ] 
}~-----}-----------------1---------] 
| RSTA | RLCB or RNSA ( 
Epi enti BSS ae pe ne Ee ent Ne el Cee J 
Note: All DSECT names have the prefix 


ISLQ. 


BRB Status Codes 


The status of a BRB at any voint in time is 
indicated by a code in the two low-order 
bits of the RSTC field, the fourth byte of 
the third fullword of the BRB. The codes 
used are: 


Buffer is allocated. This code, 
which never appears in the BRB used 
to send or receive the last segment 
of a message, makes the address 
portion of a CCW containing a TIC 
command valid. (Refer to Line 
Appendage routine for additional 
information on invalid TIC 
address.) This code typically is 
set when a buffer has been assigned 
to the next BRB in the ring. 


00 - 





01 - Buffer is in LPS queue (if 
receiving), or BRB is in Disk I/0 
queue (if sending). This code 
appears in the BRB used for the 
last segment of a message. 

10 - BRB is in Active-Buffer-Request 
queue, 


BRB is idle; that is, it is not in 
any queue. This code commonly 
indicates that no buffer has been 
assigned, or that this is the first 
BRB in the ring and no buffer has 
been assigned to the next BRB. 

This code is also set, typically, 
when a buffer has been allocated to 
the BRB but could not be used 
because the preceding segment had 
not yet been read when this BRB was 
selected. 


Ld = 


\ 


on 
MG 





PAUSE BRB/CCW 


ae ge ed ne eee ey eee ge 1 
| Write | | 
| Command | Data Address | 
| Code | | 
------- }---------------------------------| 
| Flags | Count of characters up to and | 
| | including the special character | 
[--~---- }--~----------------------------—- 
| Write | Address of the Idles address ha 
| Code | | 
------- }---------y----------------------- 
{Flags | | byte count of idles | 
[------- +--------- 1——-~---~-~------------- { 
| TIC | Address of the next BRB | 
|Command| in the ring | 
| Code | | 
}------- {------~--~-----------—--~--------- { 
| 0 {| Address of queue for PAUSE | 
| | BRB/CCWs (Additional-CCW queue) | 
epee eeapearan ee oe eee eee tee J 


The PAUSE BRB/CCW is a special-purpose 
BRB used to schedule and contain channel 
commands for the transmission of idle 
characters. It is inserted or linked into 
the ring of BRBs by the Pause routine. 


chain of several queues and as the last 
item on the Ready Queue. It signals the 
end of a chain. It is never used as an 
“available™ element. 


COMBINED CCB/ECB FOR IBM 2260 LOCAL 


This CCB/ECB is generated in the device 
access area in the terminal table entry for 
an IBM 2260 LOCAL OR 1053 Local. The value 
specified in the ACLOC operand in the DTFOT 
macro instruction determines the offset to 
the beginning of this control block. (See 
Figure 20.) 


For an IBM 2260 Local, transmission byte 
0 is assembled as X"04" (device end posting 
bit). This bit is used in conjunction with 
channel end (alone) in CSW status, to cause 
the Supervisor to leave the CCB on the 
channel queue. (This does not apply to the 
IBM 1053 Local.) 


The typical DSECT for a CCB/ECB is shown 
at the right. 


See Sa 2; aera {oe 1 
ELEMENT CONTROL BLOCK--IJLOIP5SF *00" {MRCT | MTBO |MTB1 | 
|------y------ +------}------ { 
"0O4"|MSBO |MSB1 |MLUC jMLUO | 
Form: -———-—-—-1------ 1--—_-—-~— 4i-———-—— { 
a a aa aaa oo Se ee ee 41 "08" ] MCPA | 
IJLQIPSF{key = 0 |QCB address ee qo - - - -- + 4 
————-—~——-—4-—-~-- ~~ "OCc*|MTB2 |MALA | 
[pri = 255|link address = IJLOQIPS5F| -}—————— +-—-—-—-—-~—--—-—-—---------—- 4 
eg Pesala eee eee ted “10"|MKEY [MTTA | 
|---~--4-------------------- { 
The IJLOIP5F element control block is “14° |MPRI |MNXT | 
used aS a dummy last element on the element L_-__—_—— 1————————-—~—~—-—~—~~—~—~--—— 4 
PP ee ee ee ee eae se ci a cc aaa as fo eS eee 1 
| a | er | 
| Residual Count | Transmission | Transmission | 
700° | | Byte 0 | Byte 1 | 
|-------------------- y-----—---—------- }~------------------- }-------------------- { 
| CSW Status } CSW Status {Logical Unit Class |Logical Unit Order | 
| | 
"O4'| Byte O | Byte 1 | (always 1) {| (nnn from SYSnnn) | 
a ate eS Ae 4 - +--+ + A + J 
"08 | Address of first CCW in channel program | 
}-------------------- rr er rrr nr rn rn rr rr rr rn rrr rrr { 
| Appendage | Address of IBM 2260 Local Appendage | 
*OCc*'| Indicator | | 
aa Nm a a rr ee ere rnc en| 
*10"| (Reserved) | Address of Terminal Table Entry | 
seat ashe a ala dectaaac nea a fn rn ere err rewrote | 
| ECB Priority for |] Address of Next CCB/FCB in Attention Queue | 
"14"| Linking into | | 
| Attention Queue | | 
Aha Se ie we Sl SAL a ec es CR a eee PE ATV TN Pst CTR Ia renee Re OIE AAT ROED RENAME R EL Wt ere To NR DTE Be TaN et J 
Figure 20. Combined CCB/ECB for the IBM 2260 Local 
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BUFFER PREFIXES 


First 8 bytes are not placed 
on direct - access queue 


Offset of terminal table entry from 
beginning of terminal table. 




























































—— J | 
Hex 0 4 5 6 7 8 9 AfB C D €E F 10 II 12 T3 14 15 16 17 18 19 1A\ 1B 1C 1D IE IF 
Dec 0 4 5 6 7.8 9 10pll 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26927 28 29 30 31 

; Message Previous -Destin- 
QCB Link Address Header ation 
Address Address on DASD : Link Key BNIN | BNOT 
BQCB BQLK BMAD BMHD BDTO 
Relative : 
Key BKEY Buffer Segment BSTA Beeord Nas Stored Scan Printer BSPT . 
Scheduler Size | Message Sequence Number (IN) 
Priority BSSZ Message Sequence Number (OUT) 
Hex 
Dec 
Format of Buffer containing Header 
First 8 Bytes are not placed 
on direct - access queve 
Hex 0 1 2 3 4 8 9 A B C D E F 10 11 12 13 14 15 
Dec 0 1 2 3 4 12 13 14 15 16 17 18 #19 20 21 
Message Next Message 
Address Segment Header 
Add g 
OLA. on DASD | Link Link 
BMAD BSLK BMHD 
Key BKEY Buffer Segment 
Scheduler Size 
Priority BSSZ 
Hex 0 BMPR 15 
Dec 0 





Format of Buffer containing Text 


Note: All DSECT names have the prefix IJLQ. 


Figure 21. Buffer Prefix Formats (Part 1 of 3) 
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[ i i ii eas ioc ..n.)2)2|)t*~C:CS | 
[Field | Description | Initialized by: | 
[------ 4-------------------------------------------------- 4{----------------------------- { 
| BKEY | The ECB key when the buffer appears on | Assembler { 
| "00" | the Ready queue; always zero | | 
aa es ee (oe 
| BOCB | A pointer to the OCB for the queue to ! Post or Put | 
| "01° | which the buffer has been posted. This { | 
| | field is meaningful only when the | | 
| | buffer is on the Ready queue. | | 
|------ }-------------------------------------------------- 4----~------------------------ 1 
| BMPR | The priority of the buffer. This field | Cleanup, Free BRB, | 
| *‘O4* | determines the relative position of the buffer | Interim LPS, or | 
| | when it is linked into the Ready queue or the | Disk-End appendage | 
| | element chain of a QCB. { | 
|------ }-------------------------------------------------- }----------------------------- { 
| BOLK | A pointer to the next item in the chain | Numerous routines | 
{ *05* | in which the buffer appears. j | 
----— rr nn rrr Pr nr | 
| BSSZ | Segment size (includes buffer prefix minus 8). | Buffer-BRB, Line | 
| *O8* | | appendage, Put | 
t------ Sn a nn ree hr rn { 
| BSTO | Relative address in terminal table of entry for } Source, Interim LPS, | 
| "OAS | source terminal. | Line appendage | 
Sa=== Pe canna cao ca cigar a ce aa a a { 
| BSTA |] Used to indicate the status of the | | 
| "O0C* }| message segment contained in the | | 
| | buffer. The significance of the bits | | 
| { in this field is as follows: | | 
| | | | 
. | 8 | Bit 0: If 1, do not send or process message. | Cancel Message | 
ae | | | | 
© {| 4 | Bit 1: If 1, duplicate copy of header. | Recall | 
~ | | | | 
| 2 | Bit 2: If 1, an EOB character is present in | Line Appendage | 
| | some position in the buffer other than the last. | | 
| | | | 
| 1 | Bit 3: If 1, the message was previously | Disk-End appendage | 
| | serviced or sent. | | 
| | | | 
| 8 | Bit 4: Not used. | | 
| | | | 
| 4 | Bit 5: If 1, this message was sent with | Disk-End appendage | 
| | priority. | | 
| | | | 
{| 2-1 | Bit 6-7 | | 
| | 00 = header segment (not last segment) {| Activate, Line | 
| | 01 = text segment (not last segment) | appendage, LPS | 
| } 10 = header segment (last segment) {| Control, Put | 
| |} 11 = text segment (last segment) | | 
| | | | 
| BMAD | When in main storage, the address of | Buffer-BRB | 
| ‘OD* | the LCB to which the buffer is | | 
| | assigned. | | 
| |} When on the disk, the relative record | DASD Destination | 
| | number of the segment. | | 
act eS eh ee i ah Ty a ee oc a Ae es a Na eg Se oe ee 


Figure 21. Buffer Prefix Formats (Part 2 of 3) 
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Figure 


J mm a a a af 


+ ——-++— + 


ae a a of 


SUD AED ED CD ED ED ey EE ES ee eee ee ee ED eee Cee ee ee eee cae Se eee ame SD COED Se aoee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee 


Relative record number of the next > 
segment in this message. 


For a header segment, the relative 
record number of the previous header 
segment in this queue. For a text 
segment, the relative record number of 
the header segment of this message. 


SD A ND AED EN ETD SR NED QDR HN GEPETY CREE GEINOS GiteRS GEE GOURD GRD <HORS GENE SEINE) SAS EAD SEED SEES SNE AD GND CRT SY AD ENN GED ES eee ES EN GONE GENE CEED CAND GND <TD OND ENED cae Snow) GNU any ee au 


Start of message data for a text 
segment. The remaining fields in the 
prefix apply only to a header segment. 


ie eee SR SED cee ETRE CER apeUD cena SRD <REE SEEED Gi GES GEER ETE ERIE EEE ORES OUR GRAND ARE Ene OEY SE ADEE GREED CeETD <CNE ENN SEDER <EEER os eee me GS GEE ORE ERED “EE WEE OME ERY cle EES SES we cue ORS 


The relative record number of the next 
header segment in this queue. 


OE ED AS AN ES A TS ENED ERT SOURS ERD SEED OES ERD SEED SERED GIOTED SENOT GEREN SOUP GENND GRRE GORE OETE CURED IED AEM HEED GEIS GEES ARE GE eS ee ED EE SEED CUES GEES GREE Gee une Ge Qe ce Soe eee cee wren oe 


Stored scan pointer; indicates the relative 
position within the buffer where scanning 
is to begin or resume. 


PS AN GENS ED VENI RAE UID AOE GUA ED SOME REED WEED GOURD GENER SOUND EE CREE: SOILED casey SIND <S won CeNED GORAD GREED “CUNY GRINS GEE Sten ER es Re SO ENE SEED ND EER ETS ES CEE CREED COS SD ene aoe me 


Relative address in terminal table of 
entry for destination terminal. 


ene cantare ceenne AER mentee SEED aU <eUMED SPURS ENED GERD SEES GEN AE SENAY SURE SEED TERE GREED CELET NR SED CUED UES SEDER SOURIS ENED CHOC COMED em Re ee ee eS REED GOED SEES GIED GEE SERED SEER ED EEN ED <i AE Genes me or 


Sequence-out number assigned to 
message. 


A See SEED TEEN REED SHRED OER ERED SEED ED SERED ERED Gee et GED INA SEED SERED GED ETE GREE qe eUEeD GERAD ann RED ED OeUES CE GRR Glee eee ee eee ce ee Ee RD GEES Gee eee Cee ete ee ee ee ee oo ee 


Start of message data for header 
segment. 


eRe mounts SERED Se <eele SRNR GUERS SURE RNS EGR SEED EPR GUNES GARD GREED SPARS QE GATS GREE SES SAAR REE EEE SENS SURES GED “SUEY AD EOE GOED Ome cee eee ce me GD ERE CRD GEES GREE SOMED cuuee MD sete i CORED ene ee 


21. Buffer Prefix Formats (Part 3 of 3) 
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a a 


ea a 


Fe Ae be a a ne ete ee eee 
Initialized by: | 
Ee ee eee i Ee ne eT | 
DASD Destination | 
| 
~~-~------------------------- i 
DASD Destination | 
| 

| 

| 

| 

ca al ee eos | 
| 

| 

| 

See ee 1 
DASD Destination | 
| 

eee Soon { 
Activate, Put, Cleanup, . | 
EBEOB, OR EOBLC | 
| 

Na as te a eine ati Cee aie ashe | 
Lookup or Put | 
| 

ass i is Sea ee ae | 
Sequence Number In | 
| 

See ee ee j 
Disk-End appendage | 
| 

Sc a ee ee es | 
| 

| 

nag a ae Se 4 


% 


APPENDIX C: TAM LINKAGES 








This chart depicts the linkages between module, rather than to macro-called 
macro expansions and the modules they call, modules. 
for each of the LPS, system-status 
modifying, GET, and PUT macro instructions, The entry point of each module is the 
with the exception of five of the LPS same as the module name except where it is 
delimiter macro instructions. These five shown in parentheses below the module name. 
branch directly to the QTAM Implementation Types of linkages are as follows: 

—— > is a branch —— > is a branch and link (the smaller arrowhead 

indicates the point linked from and returned to) 
SVOEXx, is an SVC 
Sao 
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QTAM QTAM 





Macro SVC/Subtask Implementation 

Instruction Modules Control Routine Module-IJLQIP 
SVC 0 . EXCP 

BREAKOFF |JLQBO }+- — Texery — — — — —»| Supervisor 









1JLQIP 
(JJLQIP22) 
Recall 





CANCELM IJLQCM 
















| Supervisor 
(QSVC30) 
CKREQ + >{JLQCR J= 
(QSVC31) 
SVC 31 Supervisor 
CHNGP 4p fiJLacr |- ~ (QPOST) a ae aa (QSVC31) 


(QSVC31) 


<> [IT — sip 7 
CHNGT | JLQCT (QPOST) 


SNC 27_ +f (HIO) 
CLOSEMC |JLQQT [JLQCLE — Te: (QSVC30) 
~ = 2t_ | asvc3i) 
VC 31 
COPYC 4 (JLQDC |----—- 1 Sd nO Pavone 







(IJLQIP80) 


Qmover 





COPYP 4————»{ 1 JLQDP |] 
COPYQ+——{ 1 JLQDQ | 

COPYT 

COUNTER* 

DATESTMP >| ILQEX| 
DIRECT ~—————>{ | JLQLK_] 









(JLQIP 
(IJLQUP23) 
Cleanup 


ENDRCV 


ENDREADY (IJLQUP20) 


LPS Control 





ENDSEND 


(IJLQIP20) 


LPS Control 








(EXCBY ~~ _, exer 
Supervisor 


first time onl 














(IJLQNDRT) 
End-Insert 


(IJLQIP23) 
Cleanup 





IJLQSH 
IJLQSK: 


(from Cleanup for multiple routing) 


EOA 





(IJLQIP22) 
Recall 









| JLQLK 
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QTAM QTAM 
Macro SVC/Subtask Implementation 
Instruction Modules Control Routine | Module-I|JLQIP 
EOB | JLQEB | JLQRW ae (IJLQUP20) 
iy aes EXCP LPS Control 
CP) Supervisor 
EOBLC | suey) (IILQIP22) 







Recall 
(ISLQUP20) 
LPS Control 


(IJLQUP22) 
Recall 












(EXCP) Supervisor 


ERRMSG 





Supervisor 


(QSVC30) 






— ee 


(QSVC31) 







(QSVC30) 


= — o 
= 
— 


(QSVC31) 







(QSVC30) 








ne oe SVC 31 
es (QSVC31) 
INTERCPT IJLQIT 
LOGSEG LiIOCS(PUT) 
-LPSTART USER LPS 
MODE IJLQMM gl IJLQSH | 
(PRIORITY) | <———————_ I JLQMP 
MODE |}JLQMM |JLQSH 
(INITIATE) ~<—— TTJLOMI 
MODE | JLQMM |1JLQSH 
(MOD2260) 
IJLQMM IJLQSH | JLQIP 
JLQMC first time on! (IJLQNDRT) 
| End Insert 
MODE from cleanup (IJLQIP23) 
(CONVERSE) IJLQMC FR Cleanup 
2 (IJLQIP20) 
Supervisor LPS Control 
(QSVC31) 


MSGTYPE << IJLQMT IJLQSH 
| JLQLK 
IJLQSH 


OPCTL 









Appendix C 363 


QTAM QTAM 





Macro SVC/Subtask Implementation 

Instruction Modules Control Routine Module-IJLQIP 
Supervisor 

PAUSE TILOPZ + ~ ~ Swat) ee —»| (QSVC30) 

POLLIMIT IJLQPL 



























POSTRCV (IJLQUP23) 
Cleanup 
(ISLQUP23) 
EXCP Cleanup 
POSTSEND : oC © — | Supervisor 
-— (ILJLQUP20) 
IJLQRW LPS Control | 
Supervisor 
PUT(message) 1 JLQPM| 2 SS SS = ied (QSVC30) 
PIE ee (QSVC31) 
PUT (record) HJLQPR | See MC (QSVC30) 
ae Mahar ere (QSVC31) 
PUT(segment) IJLQPS wea te. aye ves | ae 
Se pa >! (QSVC31) 
RC VHDR* 
RCVSEG* 


RELEASEM <—_———| HJLQRM | 
<——»[JLARR | a 
REROUTE Ce ae 
——| JLQLK | 


Supervisor 
(QSVC30) 
(QSVC31) 






RETRIEVE VICOR Dace SVC 30 _ 
(DASD address) Yeu! 


RETRIEVE IJLQRS |JLQDE 


(Sequence number) 





(QSVC30) 
(QSVC31) 

ROUTE 

SENDHDR* 

SENDSEG* 

SEQIN IJLQSI IJLQSH 

SEQOUT | JLQSO | JLQEX 

SKIP m1 |JLQSK [JLQSH 

(characters) : 

SKIP | JLQST 

(count) 
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QTAM QTAM 
Macro Modules SVC /Subtask Implementation 
Instruction Control Routine Module - [JLQIUP 


SOURCE LLILQSR | |JLQSH 













Supervisor 


STARTLN (QSVC31) 





STOPLN (QSVC30) 
TIMESTMP «——————>{ LJLQTS —»>[ LJLQEX | 
TRANS [JLQTR 


* This macro instruction generates no code or generates in-line code; it links to no module. 





QTAM AUDIO LINKAGES 





M QTAM QTAM AUDIO LINE 
| maker Modules Control Implementation Appendage 
nstructions Program Module Module 
ARUMGTYP * 
CHECKARU 


1 JLQAAZ7O 
ARU -Internal 









Supervisor 


(QSVC30) 
















\ _ VE _.I (asvc30) 
GET (message or audio) IJLQGB — eR (QSVC31) 
SVC 30 4 
GET (record or audio) IILQGC FI TTT seove2?) 7 ‘ 


(QSVC31) 
(QSVC30) 

















GET (segment or audio) <~{1JLQGD FE a ea ee 
yeu (QSVC31) 
LOGSEG HIJLQLG | EXCP 
TLIOCS(PUT) _| supervisor 
POSTARU | JLQAA20 
ARU-Receive 
SVC 30 Supervisor 
PUT (audio) LILQPA [oT (QSVC30) (LJLQUP20) 
SVC 31 LPS Control 





(QSVC31) 












REPEAT 


| JLQAA70 
ARU -Internal 








(IJLQIP20) 
LPS Control 
: LJLQFL | joes” 
TARTARU SVC 0 EXCP a 
aD a a eas 


as IJLQFL | 
PARU = 
LJLQSS 
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- APPENDIX D: 


' ITJLQAA 


TJLQOAD 


IJLQBO 
IJLOCK 
IJLOCL 
IJLQCM 


IJLQOCP 


IJLQCR 


LJLOCT 


IJLQC1 


IJLQC2 


IJLQC3 


IJLQDA 
IJLQDC 


IJLQODE 


IJLODL 
IJLODP 


IJLQODO 


IJLQDT 


IJLQEA 
IJLQEB 


IJLQEC 


IJLOER 
ITJLQEX 
IJLOFL 


IJLQGA 


ALPHABETICAL LIST OF QTAM MODULES 


Audio line appendage 
IBM 7772 disk end appendage | 


Breakoff£ (BREAKOFF) 

Checkpoint | 

Change line (STARTLN and STOPLN) 
Cancel message (CANCELM) 


Change polling list entry 
(CHNGP) 


Checkpoint Request (CKREQ) 


Change terminal table entry 
(CHNGT) 


QTAM Close Routine (CLOSE) Phase 
1 


OTAM Close Routine (CLOSE) Phase 
2 


OTAM Close Routine (CLOSE) Phase 


3 
Disk end appendage 
Copy Line Error Counters (COPYC) 


Copy terminal table entry 
(COPYT) 


Distribution list 
Copy polling list entry (COPYP) 


Copy queue control block status 
(COPYQ) 


Insert date in message header 
(DATESTMP) 


End-of-address (EQOA) 
End-of-block (EOB) 


End-of-block and line correction 
(EOBLC) 


Error message (ERRMSG) 
Expand message header 
DTF locator 


Get audio message (GET) 
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IJLQGB 


IJLQGC 


IJLOGD 


IJLQGM 
IJLOGR 
IJLOQGS 
IJLQIP 
IJLOIT 
IJLOLA 
IJLOLC 


IJLOLG 


IJLQOLK 


IJLQLO 
IJLOQMC 
IJLOMI 
IJLOMM 
IJLQOMP 
IJLOMT 


IJLOMW 


IJLOMO 


IJLOM1 


IJLQM2 


IJLQM3 


IJLQOM4 


IJLQM5 


Get audio or nonaudio message 
(GET) 


Get audio message or record 
(GET) 


Get audio message or message 
segment (GET) 


Get complete message (GET) 
Get message record (GET) 
Get message segment (GET) 
OTAM Implementation 
Intercept message (INTERCPT) 
Line appendage 
Line PCI - Program Check Module 


Audio input message logging 
(LOGSEG) 


Look-up terminal table entry 
(DIRECT) 


IBM 2260 Local Appendage 
Conversational mode (MODE) 
Initiate mode (MODE) 
Message-mode interface (MODE) 
Priority mode (MODE) 
Compare message type (MSGTYPE) 
Message writer initiator 


Model channel program for IBM 


1030 terminals 

Model channel program for IBM 
1060 terminals 

Model channel program for IBM 
2260 terminals 

Model channel program for AT&T 
83B3 terminals 


Model channel program for 
Western Union Plan 115A 
terminals 


Model channel program for IBM 
1050 switched and nonswitched 
terminals 


pe 





IJLQM6 


IJLQOM8 


IJLQM9 
IJLONO 
IJLON1 
IJLOQN2 
IJLQN3 
IJLON4 
IJLQNS 
IJLQN6 
IJLQN7 


IJLOQN8 


TJLQO1 


IJLQO2 


IJLQO3 
IJLQO 4 
IJLQO7 
IJLQO8 


IJLOQOA 
IJLQOB 
IJLQOC 
IJLOPA 
IJLOPL 


IJLOPM 


Model channel program for IBM 
1050 nonswitched terminals; not 
included if the installation 
includes 1050 switched as well 
as 1050 nonswitched terminals 


Model channel program for AT&T 
TWX terminals (Models 33 and 35) 


Module channel program for IBM 
2260 Local terminals 


Model channel program for IBM 
2740 Terminals, Type 274A 


Model channel program for IBM 


2740 Terminals, Type 274B 


Model channel program for IBM 


2740 Terminals, Type 274C 


Model channel program for IBM 


2740 Terminals, Type 274D 


Model channel program for IBM 


2740 Terminals, Type 274E 


Model channel program for IBM 


2740 Terminals, Type 274F 


Model channel program for IBM 


2740 Terminals, Type 274G 


Model channel program for IBM 


2740 Terminals, Type 274H 
Model channel program for WTTA 


Open Monitor/Open DASD Message 
Queues File (OPEN) 


Open Nonaudio Line/MS Queues 


Open Checkpoint/Restart (Phase 
1) 


Open Checkpoint/Restart (Phase 
2) 


Open IBM 7772 DCV Vocabulary 
File 


Open Audio Line Group/Output 
Queue Files 


Operator Awareness 

OBR/SDR 

Operator Control (OPCTL) 

Put audio message (PUT) 

Polling limit control (POLLIMIT) 


Put complete message (PUT) 





IJLOPR 


LTJLQOPS 


IJLOPZ 


IJLOOT 


IJLORA 


IJLORB 


IJLORC 


IJLORD 


IJLORG 
IJLQORM 
IJLQORR 


ITJLORS 


IJLQORW 


TJLOR1L 


ITJLOR2 


IJLOR3 


IJLOR4 


ITJLOR5 


IJLQR6 


IJLOQR7 


IJLOR8 


ITJLQRY 


IJLOSB 


IJLQOSC 


IJLOSH 


Put message record (PUT) 


Put message segment (PUT) 


Pause-transmit idle characters 
(PAUSE) 


Close message control (CLOSEMC) 


Translate table RCVARU: ARU 
code to EBCDIC 

Translate table RCVITA2: ITA2 
code to EBCDIC 

Translate table RCVZSC3: ZSC3 


code to EBCDIC 


Retrieve message segment by DASD 
address (RETRIEVE) 


Route message (ROUTE) 
Release message (RELEASEM) 
Re-route message (REROUTE) 


Retrieve message header by 


sequence number (RETRIEVE) 
Physical input/output control 
Translate table RCV1030: 1030 
to EBCDIC 

Translate table RCV1050: 1050 
to EBCDIC 

Translate table RCV1050F: 1050 
to monocase EBCDIC 

Translate table RCV1060: 1060 
to EBCDIC 

Translate table RCV2260: 2260 


to EBCDIC 


Translate tables RCV83B3 or 
RCV115A: AT&T 83B3 or WU Plan 
115A to EBCDIC 


Translate table RCVTWX: AT&T 
Models 33/35 (TWX) to EBCDIC 


Translate table RCV2740: 2740 
to EBCDIC 

Translate table RCV2740F: 2740 
to monocase EBCDIC 

Translate table SNDITA2: EBCDIC 
to ITA2 

Translate table SNDZSC3: EBCDIC 


to ZSC3 


Scan message header 
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IJLOSI 


IJLOSK 


IJLOSO 


IJLQSR 


IJLOSS 


IJLOST 


IJLQOS1 


IJLQS 2 


IJLOS4 


IJLQS5 


IJLOS 6 


IJLQS7 


IJLOQS8 
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Sequence-in number verification 


(SEQIN) 


Skip-through-character (SKIP) 


Insert sequence-out’ number in 


message header (SEQOUT) 


Source terminal name 
verification (SOURCE) 


Start/Stop audio line (STARTARU 


and STOPARU) 
Skip-to-character (SKIP) 


Translate table SND1030: 
to 1030 


Translate table SND1050: 
to 1050 


Translate table SND1060: 
to 1060 


Translate table SND2260: 
to 2260 


Translate tables SND83B3 
SND115A: EBCDIC to AT&T 
WU Plan 115A 


Translate table SNDTWXE: 


EBCDIC 


EBCDIC 


EBCDIC 


EBCDIC 


or 
83B3 or 


EBCDIC 


to AT&T Models 33/35 with even 


parity (TWX) 


Translate table SND2740: 
to 2740 
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EBCDIC 


IJLQS9 


IJLOTA 
IJLOTM 


IJLOTR 


IJLOTS 


IJLOTT 
IJLOT1 
IJLOT2 
IJLOT3 
IJLOT4 
IJLOT5 
IJLOWA 
IJLOW1 
IJLQOW2 


IJLOW3 


TJLOXL 


ITJLOXM 


Translate table SNDTWXO: EBCDIC 
to AT&T Models 33/35 with no 


WITA Line Appendage Module 
Terminal Test Header Analysis 


Code translation; used in 
conjunction with a QOTAM or 
user-provided translate table 


Insert time-of-day in message 
header (TIMESTMP) 


On-Line Terminal Test 


Terminal Test Module, IBM 1030 


Terminal Test Module, IBM 1050 


Terminal Test Module, IBM 1060 


Terminal Test Module, IBM 2740 


Terminal Test Module, IBM 2260 


Audio message Writer 
Message Writer for ERP 
Message Writer for Open/Close 


Message writer for Multivolume 
Facility 
Cancel Routine (Phase 1) 


Cancel Routine (Phase 2) 
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MESSAGE PROCESSING PROGRAM 


QTAM OPEN ROUTINES 


Open DASD and 
Line Group Files 


Get Message Routine Put Message Routine 


From GET 
Expansion 





Fetched by QTAM 
Open DASD 


Fetched by QTAM 
Open Monitor 


From PUT 


Expansion 









Fetched by System 
Open Monitor 


QTAM Open 

















Open Line Group Open Checkpoint Records 





Monitor/Open 
»DASD 












Store Address of 
Vector Table in 
Communication 

Region 






Compute and Save 
Extent Data for 
File 









Fetch 
File 
Protect 








Fetch Proper 
QTAM Open 
Module 















Enable, or No Op 


Command 






Qpost LCB 
to ltself 





More 
Lines in 
Group 


Fetch QTAM 
Open Monitor 

















Validate Size of 
Checkpoint Work 


Area 







Format Disk Extents 
with Dummy Records 






Return to System 
Open Monitor 










Make TIC Address 


a : Yes ‘ Segment Segment 
Valid in Previous Already Receive Segment Being Received Sent Already Yes ENDSEND EOM in Destination Queve 
eisoumes Subgroup of LPS or Sent Sent GET/PUT Prefix from Terminal Table 





: Prepare Write ‘ Set Writ Move Data from 
sa — Last Character Contin peceivertender = Header Send Segment EOB or EOT —— eonrinue Fetched by Return Work Area to 
Channel Program Subgroup of LPS Subgroup of LPS Code in LCB Open Monitor Buffer 
Receive No cOT rocco cccccno a 
CPG Cleane a 
ean- up anew SENDHDR Q 
Prepare Read EOB Prepare Write inastk F Post Buffer > 
‘Continue Last Character Initial Qpost Buffer to: NO EOB or EOT Send Header Yes Perform Other Branch to See basi = to DASD = 
Channel? Rucetyed DASD Queue : Subgroup of Header Functions in End Activat D rocess Destination Z 
nnel Program eceive Channel Program Received LPS Send Subgroup ctivate QCB in DTF Table Pap a 
0 
cf 
Yes No ve 
EOB or EOBLC Clean- up 
Perform Oth ENDSEND ; 
ho Read Ee aia EOT EOB Set Read A h QPOST Last Place Address of Wait to Remove Entire 
easel Pregaain Subgroup . EOB or EOT : Continue Fen ig ntl he LCB into DASD BRB from Ready Message 
rogr . cTrivare vallapie 
Functions in LCB Buffer Queve Process QCB Queue Moved 
POSTRCV 
Clean - up Free BRB 


Empty Buffer for Receiving 


Activate 


Prepare CCW in 


BRB for Assigned 
Buffer 













Contact 







No 











































Timer Request Element 





SETIME 
Set Time for 
Checkpoint 
Interval 






CPG RCVHDR 






























RCVSEG 

















Buffer Queve 











ENDREADY 

Save User Register, 
Branch to LPS 
Control 










QPOST 
Checkpoint 
Element to 
Itself 






LPS Control 










QWAIT 
What is on 
LPS Queue 







Message ~ filled Buffer 


LPSTART SENDSEG 











































EOB or EOBLC 
















QPOST all 







BRB Queue 





Request to Start 
Disk |/O Operation 








Open MS Process 
and Destination 
Queues 








Process Message 
Per Application 





OPEN MS-PROCESS QUEUE 













Set PCI Flag Gree ink QPOST Unused 

in CCW for B i e Buffers to Branch to QPOST to BRB's to for Another 

First Buff nen Availabl Free Line Return Buffer to Active 
irst Butter DASD Queue vailable Activate for Next Use Inactive nen Cac 









Post Previous 
Buffer to 

Return Buffer 
Queve 


Post BRB to 
Active BRB 


Queue 







Wait for Buffer 
If not Obtained 
by Previous Post 


Wait for Buffer 
in MS - process 






Move Data from 
Buffer to Work 
Area 









Special Entry 
from Buffer - BRB 









Set Length and Obtain Address of 











Mi es a a ee es a ee ee ee a ee ee 






















Post Request 











sean ee rent ay etre cre aes ieee es en eo ee ey eT, 


(via QTAM Nucleus) 


RECEIVE SCHEDULER SUBTASK INTERIM LPS SUBTASK ; DISK END APPENDAGE 























































































































































































































Post First BRB ‘ : Post Buffer to Post Buffer to Obtain Set up BRB for Vee 
‘ : bbe i : ff M 

to Active BRB) (high priority) re via ee Disk I/O Buffer for PUT x2 aie He “ Available Checkpoint Reading Next ah elas Header Segment 

Queue eee Queue sail Buffer Queue Interval Segment : 





No 


No 


Send 


Timer Delay Routine 
Scheduler cea 


QTAM Nucleus 






























| SEND SCHEDULER SUBTASK ACTIVE BRB SUBTASK ; RETURN BUFFER SUBTASK | 
| | 
| 
| 3 | | 
i Activated by 
| QTAM Nucleus 
| | | ! 
| 1 
Active BRB I 
Activated by Activated by i Activated by Activated by Entered from 
QTAM Nucleus | QTAM Nucleus | High No Link BRB into | QTAM Nucleus QTAM Nucleus DOS Supervisor 
| Prio te BRB Element Chain of , 
| PIBTANY: Active BRB Queve j 
| i 
| I 
Receive End of Poll : Sand DASD i | : 
‘Scheduler Time Delay ; Scheduler Destination : Return Buffer , Interim LPS 
| " | | 
: Assign Sequence DASD 
r | F Line Assign Disk y | Destinati P Read 
End of Set Timer for ; ae buffer me ; : Wait for l Make BRB Eligible Post Buffer to out Number and Yes . SSiineviOn Process or oe Reader Witte 
Polling List Polling Interval | me ae aoa for ’ Buffer Available Available Buffer l for Disk Read LPS Queue Turn on Message Header yeoman Etonnne ae - 
| 1 Sent Flag Bee 
| 1! | 1 
| { Y 
BRB Ring tae te ene BRB ede a ee eee ee AP ae we ST Pe ee ea 
| CHECKPOINT SUBTASK 
J 
\ ’ Reserve disk i i \ ; : . 
Build Ring of BRBs Dispatch Next I — pase pe No Full Message Locations for Next i Assign Empty | Dummy Buffer 1 Activated by tae Chain Buffer into oe of ee to Ae Benet Chain Buffer into 
for Receiving Ready Subtask | P on Queue Segment and Next 1 Buffer i (First GET) QTAM Nucleus Foi Rewite LPS Queue eader ira race <n 1. MS - process Queue 

message Weta | 1 Segment Buffer Queue e 
1 | ! 
Yes ; 
oo As \ 
| BRB Ring \ ; ' 
| 1 | 1 
J t | | 
' { | I 
\ i \ ' 
| 1 | | 
| " | 1 
| | | 
| | | I 
| | 
| | j 1 
| \ | | 
| | | 
| | 
| | | 
| 1 | 
| | | 
| | | | 
| | l 


















































































































BRB to Active 
BRB Queue 


(Low Priority) 


Response to EOB 


in BRB Actual DASD for disk read 


Address 


Disk Queue Ready Subtask Disk Read 


Segment and Next 
Message 


Receiving on Line 


BRB Queue 


Routine 


Sent 





Yes 


Interim LPS 



























































- . i i H Post Full Buffer 

Link Buffer into Post BRB to Place Disk Address Post BRB to Reserve Buffer Post Assigned Post SIO Request Link Buffer into Post Buffer 2 Yes 5 , No . Return to Post Buffer to Post Buffer to 

Disk 1/O Queue Disk I/O Queue of Message in BRB Disk I/O for Disk Read Buffer to to LPS Queue Disk I/O Queue Available Line Sending to Interim LPS DOS Supervisor LPS Queue LPS Queue 
Queve LPS Queve ahead of the BRB Buffer Queve Queue 





i . QPOST Return t Make BRB 
ee ay a oe free tu Buffer to Timer Request Post BRB to ah a fe) tt : ee Yes ms process No 
Queue neon eens EEGs Element to Disk I/O Queue Supervisor Disk Read PES 
(To Get Scheduler) LPS Queue 
ome ee wee ee eee ewe ee eee eee eee ree er ee ee Sec a a seh ae are eee ern ee ee en og ee ee een IE ge a re eR Pace ye hg hy we oN ee wi a rt Ses Ea ey ae Nah A a ps face es aa a ge Fr cele ANS ye Sas me i ate i a ee ie Sa erro err re ys ey ee ace 
GET SCHEDULER SUBTASK AVAILABLE BUFFER SUBTASK DISK I/O SUBTASK LINE APPENDAGE 
hice 
q ‘\ Activated by Activated by , Activated by Entered by 
\ + | QTAM Nucleus ! QTAM Nucleus , QTAM Nucleus DOS Supervisor 
l ager ; | 
| 
| | 
DASD , 
Destination Get Scheduler QTAM Nucleus , Available Buffer | Disk I/O Line PCI Line End 
| J 
ian Di i | Post all BRBs Line 
Assign Disk Chain Released Post BRB to pelle i i 
: Process Queue Dispatch Next | Buffer int | BRB for Read Buffer Yes Fi PCI End Yes Set Indicators in 
Location f P ws . PCI for e except First , 
amon si Full or no BRB Ready Subtask ; Available Buffer ; or Write Available shes BRB Kirst Buffer fo heli Line End or PCI Error Half- word 
Queue ; BRB Queue 
| 
| 
| No (High Priority) 
QTAM Nucleus Buffer - BRB | 
| | 
Reserve Disk ° i | Convert Relative p di EOB Last N Pass Buffer to 
Location for Next Disk Address Message on Dispatch Next No “BRB in Active Yes Is BRB for No Assign Buffer for Record Number to Assign buffer ost preceding Setup to Read Yes eidcdee Yes tine Sending ° Interim LPS 
| | 
| 
| l 
1 | 
\ 1 
| | 
| | 
| | 
| | 
| | 
i | 
| | 
i | 
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APPENDIX F: 


Figure 22 illustrates how chains of 
message segments for destination and 
process queues are formed on a direct 
access storage device. 


Fach chain consists of a series of areas 
on the direct access device. Each area 
either: 


1. Contains a message segment and the 
Ssegment’s associated header or text 
prefix, or 


2. Is reserved for the next segment to be 
placed on the chain. 


The areas, and thus the segments, are 
linked into the chain by means of 
information, called relative record 
numbers, contained in the link fields of 
the prefixes. Each chain is formed as 


follows. 


At the time the DASD message queues file 
is opened, one area is reserved for each 
chain to be formed. The header segment of 
the first message to be put on the chain is 
placed in the reserved area for that chain. 
At the same time, the next two available 
areas are reserved. The first is reserved 
for the header of the next message to be 
put on the chain, and the second is 
reserved for the first text segment of the 
same (that is, the first) message. This 
process is repeated for each succeeding 
message segment placed on the chain. Each 
time a header segment is placed in its 
reserved area, two more areas are reserved. 
Each time a text segment is placed on the 
chain, one more area 1S reserved. 


If the current segment is the last 
segment of the message, no area is reserved 
for the next text segment. Specifically, 
when a message consisting of only a header 
segment is placed on the chain, only one 
area is reserved (that is, for the header 
of the next message). When the last of a 
series of text segments is placed on the 
chain, no area is reserved. 


At the time an area is reserved, link 
information is placed in the link fields of 
the prefixes of the associated segments. 
Each header prefix contains the relative 
record numbers of the areas occupied by 
the: 


1. First text segment of the same 
message, 


HEADER AND TEXT RELATIONSHIPS ON A DASD QUEUE 


2. Previous header segment, and 


3. Next header segment. 
Each text prefix contains the relative 
record numbers of the areas occupied by 
the: 


1. Next text segment of the same message, 
and 


2. Header of the same message. 

If the header is the only segment in the 
message, the relative record number of the 
area occupied by that header is placed in 
its “next segment" link (BSLK) field. If 
the text segment is the last segment in the 
message, the relative record number of the 
header of the same message is placed in the 
BSLK field. Figure 17 illustrates the 
progressive development of two chains, one 
for queue A and one for queue B. The time 
Span covered begins with the initialization 
of the queues (when the DASD message queues 
file is opened) and ends when there are 
three complete messages on the chain for 
queue A, and two complete messages on the 
chain for queue B. 

The five messages contain a total of 
fourteen segments, which are placed on the 
chains in the following sequence: 

1. Header of message 1, queue B (B-1) 
2. Text segment of B-1 
3. Header of A-1 
4. Header of A-2 
5. Header of B-2 
6. Text segment of A-1 
7. Text segment of A-2 (last segment) 
8. Header of A-3 
9. Text segment of A-1 
10. Text segment of B-2 (last segment) 
11. Text segment of B-1 (last segment) 
12. Text segment of A-3 
13. Text segment of A-1 (last segment) 


14. Text segment of A-3 (last segment) 
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Each step in the development of the 
chains is shown in Figure 22. Each step 
Shows the currently filled areas of the 
direct-access space allotted to the chains, 
the areas reserved for succeeding segments, 
and the location of the next available area 
(that is, the area that will be reserved in 
a succeeding step). 
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eos, 


Relative record numbers representing consecutive direct - access areas: 
a Do Se Bs BS 8 ib Be vi Be Oe NO! og A ao 12 AS TA NG Se Bite 1O 4 DO 
ae Beginning of Chains ...5 Ee 

Nea for Queue A ; 










ee ee eee ee ere ee roan rr ce mes ees ewe es mete cnr es cin eu em ns et ee meneame MND eee cute come 


0-1516-1819-21 22§2425-31 | 


0-15 16-181%21 


Abb pap tet 






—— oe ee ol 


oer oro oe oer eS — = 
be meee qe eee cme ee eee eee oe 





Ea SO ree an Ne ee Se A as i a a ee te ae 
Header Segment Link Fields Intermediate Text Segment Link Fields Last Text Segment Link Fields 
H 
CT] Unreserved, unfilled area C7] Area containing header segment of message |] 
H T 
[ Area reserved for, but not yet containing, the next header segment Area containing text segment of message 2 
T 
CJ Area reserved for, but not yet containing, the next text segment Cj Area filled during this event 
Shaded blocks represent areas on queve A; Unshaded blocks represent areas on queve B | Points to next available area 





Figure 22. Example of Message Header and Text Relationships in Direct 
Access Destination and Process Queue 


Appendix F 373 


LPS 







Message 
Control 
Program 


SVC Z 


ENDREADY 
Macro 
Expansion 












LOGSEG © 
Macro 
Expansion 









REPEAT 
Macro 
Expansion 





~ CHECKARU 
Macro 
Expansion 













POSTARU 
Macro 
Expansion _ 





Message 
Processing 
Program 
OPEN 
Macro 
Expansion 


GET 
Macro 
Expansion 


STARTARU 
or STOPARU 
Macro 
Expansion 


CLOSEMC 
Macro 
Expansion 








SVC 30 
SVC 3] 









External 
Routines 


TRANS 
Module 


LOGSEG 
Medule 


External 
Routines 


GET 
SVC 30 
Module 


(ALCB/CPQ) 


START/ 
STOP 
Module 


SVC 0 


SVC 3] 


(ALCB/SEND) 


CLOSEMC 
Module 


SVC 27 
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whee QPOST 
eee QD ISPATCH 








QTAM Control Program 







Truncated 


Subtasks 










QWAIT/QPOST SVC Routine 


7772 DCV Buffer Subtask 





7/72 DCV 
Buffer 


Routine 












Asynchronous 
Interrupt 


SVC 







System 
Supervisor 
Area 






AUDIO LINE 
SVC 0 
Transient 
Area 










7772 Disk 
Appendage 











— 







Audio Line 
Appendage 








(ALCB/SEND) 
(DCVBUF/BUFARU) 
(ALCB/LPS) 








[JLQIP20 SVC 0 
LPS Control SYC OF 
Routine 
SVC 30 
(ALCB/LPS ) To LPS 





| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


Implementation Module 


QTAM/ARU Implementation 


| 7772 Disk Appendage Module 










7772 Disk Read Routine 













DASD Word 
(DCVBUF/LPS) 
Main Storage Word 


i | 7772 Line Write Routine _| Line Write Routine 


(ALCB/LPS) 


eee 0 — asm sug =e oe 


ARU SEND Subtask 


ARU Send 


Routine 









7770 
(ALCB/LPS) 






VER 


ARU Internal 


Routine Routine 


SVC 31 
(ALCB/SENI?) od 


Audio Line Appendage Module 
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ARU Receive 


SVC 3] 


(ALCB/CPQ) 
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